powComplex, imaginary part

Time bar (total: 2.2min)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

analyze385.0ms (0.3%)

Memory
26.2MiB live, 599.0MiB allocated; 63ms collecting garbage
Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
18.8%18.7%81.1%0.2%0%0%0%7
18.8%18.7%81.1%0.2%0%0%0%8
18.8%18.7%81.1%0.2%0%0%0%9
34.4%34.3%65.5%0.2%0%0%0%10
54.7%54.6%45.2%0.2%0%0%0%11
54.7%54.6%45.2%0.2%0%0%0%12
Compiler

Compiled 39 to 18 computations (53.8% saved)

sample3.0s (2.3%)

Memory
-64.4MiB live, 3 011.7MiB allocated; 1.4s collecting garbage
Samples
1.1s2 881×1valid
709.0ms5 318×0valid
48.0ms57×2valid
Precisions
Click to see histograms. Total time spent on operations: 1.5s
ival-mult: 373.0ms (24.2% of total)
ival-hypot: 262.0ms (17% of total)
ival-sin: 217.0ms (14.1% of total)
ival-log: 204.0ms (13.2% of total)
adjust: 176.0ms (11.4% of total)
ival-atan2: 115.0ms (7.5% of total)
ival-exp: 85.0ms (5.5% of total)
ival-add: 54.0ms (3.5% of total)
ival-sub: 50.0ms (3.2% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

explain420.0ms (0.3%)

Memory
13.3MiB live, 443.5MiB allocated; 31ms collecting garbage
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1750-0-(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
1390-0-(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
80-1(1.4434467416934997e+67 -8.856562000023842e-252 1.539516224190055e-164 4.3507432105227584e+113)(*.f64 (atan2.f64 x.im x.re) y.im)
40-1(1.7488223864497046e+179 3.72503267666923e-137 2.6077617155500967e+295 -1.4021108516134835e-283)(*.f64 (atan2.f64 x.im x.re) y.re)
00-0-(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
00-0-(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
00-0-(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
00-0-(atan2.f64 x.im x.re)
00-0-(*.f64 x.re x.re)
00-0-(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
00-0-x.re
00-0-x.im
00-0-(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
00-0-(*.f64 x.im x.im)
00-0-(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
00-0-(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
00-0-y.re
00-0-y.im
00-0-(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
sin.f64(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))sensitivity1750
sqrt.f64(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))oflow-rescue1270
↳(*.f64 x.re x.re)overflow73
↳(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))overflow127
↳(*.f64 x.im x.im)overflow70
*.f64(*.f64 (atan2.f64 x.im x.re) y.im)n*u20
Confusion
Predicted +Predicted -
+1573
-6036
Precision
0.7235023041474654
Recall
0.98125
Confusion?
Predicted +Predicted MaybePredicted -
+15703
-60036
Precision?
0.7235023041474654
Recall?
0.98125
Freqs
test
numberfreq
039
1132
283
32
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
176.0ms342×1valid
34.0ms164×0valid
5.0ms6×2valid
Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 147.0ms
ival-mult: 42.0ms (28.5% of total)
adjust: 23.0ms (15.6% of total)
ival-sin: 19.0ms (12.9% of total)
ival-hypot: 18.0ms (12.2% of total)
ival-log: 17.0ms (11.6% of total)
ival-atan2: 12.0ms (8.2% of total)
ival-add: 7.0ms (4.8% of total)
ival-exp: 5.0ms (3.4% of total)
ival-sub: 4.0ms (2.7% of total)
ival-true: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)

preprocess173.0ms (0.1%)

Memory
8.2MiB live, 150.1MiB allocated; 17ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0141575
1390556
21085552
32819550
01937
03437
16236
215736
334236
482236
5453936
0818325
Stop Event
1×iter limit
1×node limit
1×iter limit
1×node limit
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
Compiler

Compiled 37 to 19 computations (48.6% saved)

eval0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory
0.8MiB live, 0.8MiB allocated; 0ms collecting garbage
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶38.0%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 37 to 19 computations (48.6% saved)

series260.0ms (0.2%)

Memory
8.1MiB live, 248.3MiB allocated; 55ms collecting garbage
Counts
19 → 272
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
132.0ms
y.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
17.0ms
x.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
13.0ms
y.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
12.0ms
y.im
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
11.0ms
y.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite225.0ms (0.2%)

Memory
-4.4MiB live, 280.4MiB allocated; 48ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0158020000
0161119794
0824016874
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
291 → 337
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (atan2.f64 x.im x.re) y.im) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (-.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(/.f64 (+.f64 (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))) (+.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 x.im) x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
x.re
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (*.f64 (atan2.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) #s(literal 3 binary64)) (pow.f64 (*.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (-.f64 (*.f64 (*.f64 (atan2.f64 x.im x.re) y.re) (*.f64 (atan2.f64 x.im x.re) y.re)) (*.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/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/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64))) (*.f64 #s(literal -1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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 (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (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 (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (-.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (*.f64 #s(literal 1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))

eval61.0ms (0%)

Memory
-16.4MiB live, 74.1MiB allocated; 8ms collecting garbage
Compiler

Compiled 31 728 to 2 798 computations (91.2% saved)

prune528.0ms (0.4%)

Memory
-39.4MiB live, 466.8MiB allocated; 60ms collecting garbage
Pruning

12 alts after pruning (12 fresh and 0 done)

PrunedKeptTotal
New44312455
Fresh000
Picked101
Done000
Total44412456
Accuracy
96.6%
Counts
456 → 12
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.3%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.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))))
▶83.9%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
31.1%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #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))))
48.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
60.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
▶20.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
24.3%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
▶17.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
23.7%
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
▶55.8%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
52.6%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
▶34.1%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Compiler

Compiled 1 892 to 846 computations (55.3% saved)

series1.5s (1.1%)

Memory
91.2MiB live, 1 436.1MiB allocated; 249ms collecting garbage
Counts
102 → 1 821
Calls
Call 1
Inputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(log.f64 (hypot.f64 x.im x.re))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.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))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) 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))) x.im)) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
(sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
(*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
(*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
(cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))
Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.im) 3) (pow x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.im) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re)))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))) (* (pow x.re 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/6 (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (pow x.re 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (log (pow x.im y.im)))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.im y.im)))) (pow x.im 2))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (pow x.re 2) (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.im y.im)))) (pow x.im 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (log (pow x.im y.im))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* -1/48 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* -1/48 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.re) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re)))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))) (* (pow x.im 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (pow x.im 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (log (pow x.re y.im)))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.re y.im)))) (pow x.re 2))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (pow x.im 2) (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.re y.im)))) (pow x.re 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (log (pow x.re y.im))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* -1/48 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* -1/48 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 4))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow y.re 3)) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* -1/6 (* (pow y.re 2) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re))) y.re)) (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) (* 1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1 (* y.re (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))))))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (+ (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* (pow y.im 2) (+ (* 1/12 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* (pow y.im 2) (+ (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/6 (* y.im (* y.re (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (pow (atan2 x.im x.re) 3)) (* (pow y.im 2) (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (pow (atan2 x.im x.re) 3)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))) (* y.im (* y.re (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))) (* y.im (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 1))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.im (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (atan2 x.im x.re))))))) (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)) (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (pow y.im 3))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) y.im))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) y.im)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) y.im)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
Calls

12 calls:

TimeVariablePointExpression
193.0ms
x.im
@inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) 2 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 3) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))
157.0ms
x.im
@-inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) 2 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 3) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))
126.0ms
y.re
@0
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) 2 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 3) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))
125.0ms
x.re
@-inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) 2 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 3) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))
121.0ms
x.re
@inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (* y.re (log x.im)) (log x.im) (* y.im (atan2 x.im x.re)) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (sqrt (+ (* x.im x.im) (* x.re x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) 2 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (atan2 x.im x.re) 3) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))

rewrite1.3s (1%)

Memory
45.0MiB live, 1 722.4MiB allocated; 272ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
011817430261
012063430261
012063414158
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 923 → 1 942
Calls
Call 1
Inputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(hypot.f64 x.im x.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(log.f64 (hypot.f64 x.im x.re))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.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))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) 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))) x.im)) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
(sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
(*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
(*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
(cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.im) 3) (pow x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.im) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re)))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (log (pow x.im y.im)))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.im y.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.im y.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (+ (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* (pow x.re 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.im y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/24 (* (pow x.re 2) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.im y.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* 1/720 (* (pow x.re 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (pow x.im y.im))) (pow x.im 2))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im))))) (pow x.im y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (pow x.im y.im)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))) (pow x.im y.im)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6))))) (pow x.im y.im))))))) (pow x.im y.im))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))) (* (pow x.re 2) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))) (* (pow x.re 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.re 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* -1/6 (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.re 2) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (pow x.re 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (pow x.re 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))) (* (pow x.re 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (pow (atan2 x.im x.re) 3))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.re 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (log (pow x.im y.im)))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (log (pow x.im y.im))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.im y.im)))) (pow x.im 2))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.im y.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* (pow x.re 2) (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.im y.im)))) (pow x.im 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (log (pow x.im y.im))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.im y.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.im y.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.im y.im)))) (pow x.im 4))) (* 1/24 (* (sin (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))))))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.im y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.im 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4)))))))) (pow x.im 2))) (* (sin (log (pow x.im y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/8 (/ (pow y.im 2) (pow x.im 4))))) (pow x.im 2))) (+ (* 30 (/ (pow y.im 3) (pow x.im 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))) (atan2 x.im x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* -1/48 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/48 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))) (pow x.re 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))) (pow x.re 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.re 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.re 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.re 2)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 4)) (/ (* (+ (* -1/48 (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.re 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.re 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* -1/48 (/ (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (pow x.re 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3))))))))))) (pow x.re 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* -1/48 (* (pow x.im 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -3 (* (pow x.im 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.im 2) (* y.im (+ (* -1/4 (* (pow x.im 4) y.im)) (* 1/8 (* (pow x.im 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.im 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.im 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.re) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re)))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (log (pow x.re y.im)))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (log (pow x.re y.im))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (log (pow x.re y.im)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (+ (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* (pow x.im 2) (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (log (pow x.re y.im))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/24 (* (pow x.im 2) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (log (pow x.re y.im)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* 1/720 (* (pow x.im 2) (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))) (* 1/24 (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (pow x.re y.im))) (pow x.re 2))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im))))) (pow x.re y.im))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (pow x.re y.im)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))) (pow x.re y.im)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6))))) (pow x.re y.im))))))) (pow x.re y.im))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))) (* (pow x.im 2) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))) (* (pow x.im 2) (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.re (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/8 (/ (* (pow y.im 2) (sin (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 2)) (* (pow x.im 2) (* (+ (* -1/48 (/ (* y.im (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (* (pow x.im 2) (+ (* 1/12 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))) (* -1/6 (* (pow x.im 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (pow x.im 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))) (* (pow x.im 2) (* y.re (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (pow (atan2 x.im x.re) 3))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (pow (atan2 x.im x.re) 3)) (* (pow x.im 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (pow (atan2 x.im x.re) 3))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (log (pow x.re y.im)))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (log (pow x.re y.im))))) (pow x.re 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.re y.im)))) (pow x.re 2))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (log (pow x.re y.im))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* (pow x.im 2) (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))))) (* 1/2 (/ (* y.im (sin (log (pow x.re y.im)))) (pow x.re 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (log (pow x.re y.im))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (log (pow x.re y.im))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (log (pow x.re y.im))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (log (pow x.re y.im)))) (pow x.re 4))) (* 1/24 (* (sin (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))))))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* -1/48 (/ (* y.im (* (cos (log (pow x.re y.im))) (+ (* -3 (/ (pow y.im 2) (pow x.re 4))) (* 24 (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4)))))))) (pow x.re 2))) (* (sin (log (pow x.re y.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/720 (+ (* -360 (/ (* y.im (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/8 (/ (pow y.im 2) (pow x.re 4))))) (pow x.re 2))) (+ (* 30 (/ (pow y.im 3) (pow x.re 6))) (* 720 (+ (* -1/8 (/ (pow y.im 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))) (atan2 x.im x.re))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* -1/48 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/48 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))) (+ (* 1/24 (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/720 (/ (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))) (pow x.im 6))) (+ (* 1/24 (/ (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (exp (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (exp (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))) (pow x.im 6)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (+ (/ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))))) (pow x.im 2)) (+ (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* y.re (+ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.re (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 4)) (+ (/ (* y.re (+ (* -1/2 (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)))))) (pow x.im 6)) (+ (/ (* y.re (+ (* -1/4 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (* 1/12 (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))) (pow x.im 2)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))) (+ (* -1/2 (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (+ (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 4)) (/ (* (+ (* -1/48 (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 2)) (pow x.im 6)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))) (+ (* -1/6 (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6))) (* 1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* y.re (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (pow (atan2 x.im x.re) 3)) (pow x.im 6)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4)))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* -1/48 (/ (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (pow x.im 6))))) (+ (* 1/24 (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3))))))))))) (pow x.im 6)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* 1/24 (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* -1/48 (* (pow x.re 2) (* y.im (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -3 (* (pow x.re 4) (pow y.im 2))) (* 24 (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2)))))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (+ (* -360 (* (pow x.re 2) (* y.im (+ (* -1/4 (* (pow x.re 4) y.im)) (* 1/8 (* (pow x.re 4) (pow y.im 2))))))) (+ (* 30 (* (pow x.re 6) (pow y.im 3))) (* 720 (+ (* -1/8 (* (pow x.re 6) (pow y.im 2))) (+ (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.im 3)))))))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log x.im) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 4))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.re (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (log x.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (log x.im) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (+ (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow y.re 3)) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1/6 (* (pow y.re 3) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* -1/6 (* (pow y.re 2) (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (+ (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) (pow y.re 2)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* y.re (+ (* -1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log x.im)) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re))) (* -1 (/ (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) y.re))) y.re)) (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (/ (+ (* -1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2))) (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) y.re)) (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (atan2 x.im x.re)) y.re)) (* 1/2 (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)))) y.re)) (* -1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1 (* y.re (+ (* 1/6 (* (cos (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 3))) (* 1/2 (/ (* (sin (log (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im))) (pow (atan2 x.im x.re) 2)) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (pow x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow x.im y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* y.im (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* 1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))))))) (* y.re (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (* -1/6 (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/4 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (+ (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* 1/2 (* y.im (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* y.im (+ (* 1/2 (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* y.im (* (+ (* -1/4 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* 1/24 (+ (* -6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -4 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* 12 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (atan2 x.im x.re) 2))) (* (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/6 (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (pow (atan2 x.im x.re) 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* (pow y.im 2) (+ (* 1/12 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (+ (* -1/6 (* y.re (pow (atan2 x.im x.re) 3))) (* (pow y.im 2) (+ (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/6 (* y.im (* y.re (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3))))) (* 1/12 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.re (pow (atan2 x.im x.re) 3)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (pow (atan2 x.im x.re) 3)) (* (pow y.im 2) (+ (* -1/2 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))))) (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.re (pow (atan2 x.im x.re) 3)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* y.im (+ (* -1/2 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))) (* y.im (* y.re (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (atan2 x.im x.re) 3)))) (* y.im (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (pow (atan2 x.im x.re) 3))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 1))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re))))) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (atan2 x.im x.re)))) (* y.im (* (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -3 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (+ (* -1/8 (pow (+ (* -1 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) 2)) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))) (atan2 x.im x.re))))))) (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* y.im (- (/ (* y.re (log x.im)) y.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)) (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (pow y.im 3))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.im)))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) #s(hole binary64 (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) #s(hole binary64 (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log x.im)) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) y.im))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) y.im)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) y.im)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.re (log.f64 x.im))
(log.f64 x.im)
(*.f64 y.im (atan2.f64 x.im x.re))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.im (log.f64 x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(+.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 x.im x.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(+.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(log.f64 (hypot.f64 x.im x.re))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
#s(literal 2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.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))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) 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))) x.im)) y.re)
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
(sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)
(log.f64 (hypot.f64 x.re x.im))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 x.re x.im)
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
(sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))
(pow.f64 (hypot.f64 x.im x.re) y.im)
(*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
(*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
(*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
(cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
(*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 3 binary64)) (pow.f64 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (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.im) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (log.f64 (pow.f64 x.im y.im))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (log.f64 (pow.f64 x.im y.im)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.im y.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.im y.im))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.im y.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im)))) (pow.f64 x.im y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.im y.im)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.im)))))) (pow.f64 x.im y.im)))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (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 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (log.f64 (pow.f64 x.im y.im))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.im y.im))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.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 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.im y.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.im y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) 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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (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 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (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 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (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 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))) (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 3 binary64)) (pow.f64 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.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 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* x.im x.im) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (log.f64 (pow.f64 x.re y.im))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (log.f64 (pow.f64 x.re y.im)))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (+.f64 (log.f64 (pow.f64 x.re y.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (pow.f64 x.re y.im))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (pow.f64 x.re y.im))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im)))) (pow.f64 x.re y.im)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (pow.f64 x.re y.im)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.im)))))) (pow.f64 x.re y.im)))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (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 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (log.f64 (pow.f64 x.re y.im))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.re y.im))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.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 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (log.f64 (pow.f64 x.re y.im)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (sin.f64 (log.f64 (pow.f64 x.re y.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/48 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64)))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -3 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (*.f64 #s(literal 24 binary64) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -360 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.im #s(literal 2 binary64))))))) (fma.f64 #s(literal 30 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))))))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (*.f64 #s(literal -1 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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (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) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im 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))) (atan2.f64 x.im x.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (pow.f64 (log.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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (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 4 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#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)) (fma.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)) (fma.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)) (fma.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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.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)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (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)) (atan2.f64 x.im 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))) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.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 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.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 5 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 6 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 5 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow.f64 (log.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))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (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 3 binary64)))) (pow.f64 (log.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))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/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 3 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 3 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (+.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.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 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.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 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (log.f64 (pow.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 (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.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 (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (*.f64 (cos.f64 (log.f64 (pow.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 (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (log.f64 (pow.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 (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.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 (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (log.f64 x.im)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.re (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (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 (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.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))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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)))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 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)))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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)))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (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))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.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)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) (pow.f64 y.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 y.re #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) (pow.f64 y.re #s(literal 2 binary64))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) (pow.f64 y.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) (pow.f64 y.re #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (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 (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) y.re)) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (log.f64 (pow.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)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) y.re))) y.re) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) y.re)) y.re) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (log.f64 (pow.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)) y.re) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) y.re) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 (log.f64 (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (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) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #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) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im 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 x.im y.re))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 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 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))))))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal 1/24 binary64) (*.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 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 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 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 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 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 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 y.im (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 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 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) #s(literal 1 binary64))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.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 (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -3 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #s(literal 3 binary64))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 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))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re 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.im))
#s(approx (* y.re (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))
#s(approx (* (sin (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* -1/6 (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* y.re (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (pow (atan2 x.im x.re) 3)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (cos (log (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (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 (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.im))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.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) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (log.f64 x.im)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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))) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.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))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) y.im))))) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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)) y.im))) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) y.im))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) y.im))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) y.im))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) y.im))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) y.im))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) 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))))))

eval1.4s (1.1%)

Memory
66.0MiB live, 2 059.1MiB allocated; 376ms collecting garbage
Compiler

Compiled 1 078 485 to 32 946 computations (96.9% saved)

prune45.3s (34.5%)

Memory
123.9MiB live, 46 650.9MiB allocated; 3.6s collecting garbage
Pruning

14 alts after pruning (11 fresh and 3 done)

PrunedKeptTotal
New3 68683 694
Fresh437
Picked235
Done000
Total3 692143 706
Accuracy
97.1%
Counts
3 706 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.3%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.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))))
✓83.9%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
36.5%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
35.5%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.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))))
▶34.8%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
43.7%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
▶37.0%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
▶48.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
✓20.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
✓17.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
23.7%
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
▶46.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
12.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))))
▶21.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Compiler

Compiled 3 310 to 1 148 computations (65.3% saved)

series1.1s (0.9%)

Memory
-0.6MiB live, 1 051.2MiB allocated; 172ms collecting garbage
Counts
141 → 2 198
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))
(fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(log.f64 (hypot.f64 x.im x.re))
(hypot.f64 x.im x.re)
#s(literal 2 binary64)
(*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))
#s(literal -1/6 binary64)
(*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 x.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.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)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
(*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
(+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
(sin.f64 (*.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.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))
(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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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.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))))
(*.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)))
(+.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))
(/.f64 (*.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)
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) (* (pow x.re 2) (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.im) 3) (pow x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.im) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log x.im)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (/ (* y.im (log x.im)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (/ (* y.im (log x.im)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (/ (* y.im (log x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ 1 x.re))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ -1 x.re))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) (* (pow x.im 2) (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (log x.im) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.re) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log x.re)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (/ (* y.im (log x.re)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (/ (* y.im (log x.re)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (/ (* y.im (log x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ 1 x.im))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ -1 x.im))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/12 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/12 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/12 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* (pow y.re 2) (+ (* -1/144 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* (pow y.re 2) (+ (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/144 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))) (* 1/4320 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/720 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))) (* 1/24 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 4))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (+ (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (pow y.re 3)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* -1 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* -1 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 7) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* -1/6 (* (pow y.im 2) (pow (log x.im) 3)))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 5)))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 7))) (* 1/120 (pow (log x.im) 5))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 3) (atan2 x.im x.re)))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 5) (atan2 x.im x.re)))))))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 5))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 7))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 9))) (* 1/120 (pow (log x.im) 7)))))) (pow (log x.im) 3)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3)))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 8) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (pow (atan2 x.im x.re) 5)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.im) 2))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.im) 4))))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.im) 6))) (* 1/24 (pow (log x.im) 4)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 6))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log x.im) 4)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 4) (atan2 x.im x.re)))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (+ (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 6) (atan2 x.im x.re)))))))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 6))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 8))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 10))) (* 1/120 (pow (log x.im) 8)))))) (pow (log x.im) 4)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* 1/2 (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (pow (log x.im) 2))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 4))) (* 1/2 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 4) (atan2 x.im x.re)))))))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 4))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 6))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 8))) (* 1/120 (pow (log x.im) 6)))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.im 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/120 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.im 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 7))) (* 1/120 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (atan2 x.im x.re)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* 1/24 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (atan2 x.im x.re)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6) (atan2 x.im x.re))))) (* 1/24 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/24 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6) (atan2 x.im x.re)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))))) (atan2 x.im x.re))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 1))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* 1/24 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 3)) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1/6 (* (pow y.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)) (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (pow y.im 3))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))) y.im)) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) y.im))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) y.im)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) y.im)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
199.0ms
x.im
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) 2 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) 1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re))
89.0ms
x.re
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) 2 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) 1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re))
67.0ms
x.re
@inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) 2 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) 1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re))
64.0ms
x.im
@-inf
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) 2 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) 1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re))
59.0ms
x.re
@0
((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (sqrt (+ (* x.im x.im) (* x.re x.re))) 2 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) 3 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) 1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re))

rewrite1.3s (1%)

Memory
88.4MiB live, 1 310.5MiB allocated; 179ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
012974454076
013331454076
013331436146
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
2 339 → 2 364
Calls
Call 1
Inputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))
(fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(log.f64 (hypot.f64 x.im x.re))
(hypot.f64 x.im x.re)
#s(literal 2 binary64)
(*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))
#s(literal -1/6 binary64)
(*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 x.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.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)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
(*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
(+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
(sin.f64 (*.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.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))
(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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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.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))))
(*.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)))
(+.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))
(/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))) (* (pow x.re 2) (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* (pow x.re 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (pow x.im y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (pow x.im y.re))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))) (* (pow x.re 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.im) 3) (pow x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 3) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re)) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (pow x.im y.re))) (pow x.im 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))) (pow x.im y.re))) (+ (* (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (pow x.im y.re)) (* (pow (log x.im) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))))))) (* (pow (log x.im) 3) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))))))) (* (pow (log x.im) 3) (pow x.im y.re)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))) (pow x.im 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (pow x.im 2))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* (pow x.re 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (* (pow x.re 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (pow x.re 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (atan2 x.im x.re) (pow x.im y.re))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))) (pow x.im 2)))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (atan2 x.im x.re) (pow x.im y.re))))))))) (/ (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im 2))))) (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.im) (pow x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (* 1/2 (/ (pow x.im y.re) (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.im) (pow x.im y.re)) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (log x.im) (pow x.im y.re))) (pow x.im 2))) (+ (* 1/2 (/ (pow x.im y.re) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.im y.re) (pow x.im 4))) (+ (* 1/4 (/ (* y.re (pow x.im y.re)) (pow x.im 4))) (+ (* (log x.im) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.re 2) (+ (* -1/8 (/ (* y.re (pow x.im y.re)) (pow x.im 6))) (+ (* 1/6 (/ (pow x.im y.re) (pow x.im 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (pow x.im 2))) (* (log x.im) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re)))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)) (* (pow x.re 2) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log x.im)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (/ (* y.im (log x.im)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (/ (* y.im (log x.im)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (/ (* y.im (log x.im)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (pow x.re 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (log (/ 1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (pow (log (/ 1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (log (/ 1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (log (/ 1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.re)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ 1 x.re))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (pow x.re 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))) (pow x.re 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))))))))) (pow x.re 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.re 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.re 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (atan2 x.im x.re))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (atan2 x.im x.re))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.re 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))))))) (pow x.re 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (pow x.re 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.re 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (+ (* -1/12 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.re 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 3) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (log (/ -1 x.re)) 3)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6))) (+ (* -1/12 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.re 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (pow (atan2 x.im x.re) 2))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow (atan2 x.im x.re) 2))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2)))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (pow (atan2 x.im x.re) 2))) (pow x.re 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.re 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.re 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* -1 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))) (atan2 x.im x.re)))) (pow x.re 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.re 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (pow (log (/ -1 x.re)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.re 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* 1/4 (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))))))) (pow x.re 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/2 (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))))))))) (pow x.re 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))))) (* 1/2 (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (log (/ -1 x.re)) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (log (/ -1 x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.re))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re)) (pow x.re 4)) (/ (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re)) (pow x.re 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.re)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ -1 x.re))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (+ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))) (* (pow x.im 2) (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* (pow x.im 2) (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))) (* -1/6 (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (log x.im) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (+ (* y.im (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (atan2 x.im x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (pow x.re y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))) (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (atan2 x.im x.re) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* -1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (pow x.re y.re))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))) (* (pow x.im 2) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 3) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re)) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (pow x.re y.re))) (pow x.re 2))) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))) (pow x.re y.re))) (+ (* (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (pow x.re y.re)) (* (pow (log x.re) 3) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))))))) (* (pow (log x.re) 3) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))))))) (* (pow (log x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* -1/12 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))) (pow x.re 2))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))) (pow x.re 2))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re))) (* (pow x.im 2) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))))) (* (pow (atan2 x.im x.re) 3) (pow x.re y.re)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))) (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (* (pow x.im 2) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 6))) (+ (* 1/6 (/ (* (pow (atan2 x.im x.re) 2) (pow x.re y.re)) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (pow (atan2 x.im x.re) 2) (pow x.re y.re))))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (* (pow x.im 2) (+ (* 1/2 (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))))))) (* 1/2 (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 4))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2))) (+ (* (sin (* y.re (atan2 x.im x.re))) (* (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))) (* (atan2 x.im x.re) (pow x.re y.re)))) (+ (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (atan2 x.im x.re) (pow x.re y.re))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))) (pow x.re 2)))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (atan2 x.im x.re) (pow x.re y.re))))))))) (/ (* (log x.re) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))) (pow x.re 2))))) (* (pow (log x.re) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (* (log x.re) (pow x.re y.re))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log x.re) (pow x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (* 1/2 (/ (pow x.re y.re) (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* (log x.re) (pow x.re y.re)) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (log x.re) (pow x.re y.re))) (pow x.re 2))) (+ (* 1/2 (/ (pow x.re y.re) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.re y.re) (pow x.re 4))) (+ (* 1/4 (/ (* y.re (pow x.re y.re)) (pow x.re 4))) (+ (* (log x.re) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.im 2) (+ (* -1/8 (/ (* y.re (pow x.re y.re)) (pow x.re 6))) (+ (* 1/6 (/ (pow x.re y.re) (pow x.re 6))) (+ (* 1/2 (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (pow x.re 2))) (* (log x.re) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re)))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log x.re)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log x.re))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re))))) (pow x.re 2))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.im (log x.re))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (cos (* y.im (log x.re))) (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* y.im (log x.re))) (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)) (* (pow x.im 2) (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log x.re)))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.im (log x.re))))) (pow x.re 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* y.im (log x.re))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log x.re)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (/ (* y.im (log x.re)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (/ (* y.im (log x.re)) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (/ (* y.im (log x.re)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (pow x.im 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (log (/ 1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (pow (log (/ 1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (log (/ 1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (log (/ 1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ 1 x.im))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (+ (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4))) (+ (* -1/6 (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (pow x.im 6)) (+ (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))) (pow x.im 4)) (/ (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))))))))) (pow x.im 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (* y.im (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))))) (+ (* -1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))))))) (pow x.im 6)) (+ (/ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* -1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))) (+ (* 1/4 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))))))) (pow x.im 2)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6))) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (atan2 x.im x.re))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (atan2 x.im x.re))) (pow x.im 2))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))))) (pow x.im 2))) (+ (* -1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))))))) (pow x.im 6))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (pow x.im 6)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))) (pow x.im 6)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))))) (* 1/2 (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (+ (* -1/12 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))))) (pow x.im 2)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2))))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 2)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 3) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (log (/ -1 x.im)) 3)))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))) (+ (* -1/6 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6))) (+ (* -1/12 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (atan2 x.im x.re) 3))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 6)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 3)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 3))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 3))) (pow x.im 6)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/4 (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow (atan2 x.im x.re) 2))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2)))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (pow (atan2 x.im x.re) 2))) (pow x.im 2))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re)))))))) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))))) (pow x.im 2))) (* 1/2 (/ (+ (* -1/2 (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))))) (pow x.im 4))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* -1 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 4) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))) (atan2 x.im x.re)))) (pow x.im 6)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 4)) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (atan2 x.im x.re))))) (pow x.im 4)) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (pow (log (/ -1 x.im)) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (atan2 x.im x.re))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))) (+ (* -1/4 (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* 1/4 (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))))))) (pow x.im 4)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))))) (+ (* -1/8 (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (+ (* 1/720 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/2 (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))))))))) (pow x.im 6)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/2 (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))))) (* 1/2 (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* -1 (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im)))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4))) (+ (* -1 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (log (/ -1 x.im)) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (log (/ -1 x.im))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 6) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/720 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 6))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* y.im (log (/ -1 x.im))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re)) (+ (/ (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re)) (pow x.im 4)) (/ (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re)) (pow x.im 6)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* -1 (* y.im (log (/ -1 x.im)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (- (+ (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (* -1 (/ (* y.im (log (/ -1 x.im))) y.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re)))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/12 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/12 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/12 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/12 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* (pow y.re 2) (+ (* -1/144 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))) (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (+ (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* (pow y.re 2) (+ (* 1/12 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/144 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))) (* 1/4320 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/24 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (+ (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.re 2) (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow y.re 2) (+ (* -1/720 (* y.im (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))) (* 1/24 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (+ (* y.re (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1 (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 2))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* y.re (+ (* y.im (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))) (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.im (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (* y.im (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* 1/2 (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 3))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 5)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* y.im (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* y.im (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6)))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (pow (atan2 x.im x.re) 4))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* y.re (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))) (pow (atan2 x.im x.re) 4)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 3)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* 1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/2 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (+ (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (pow y.re 3)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) #s(hole binary64 (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) #s(hole binary64 (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* -1 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* -1 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 7) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* -1/6 (* (pow y.im 2) (pow (log x.im) 3)))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 5)))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 7))) (* 1/120 (pow (log x.im) 5))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 3) (atan2 x.im x.re)))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 5) (atan2 x.im x.re)))))))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 5))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 7))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 9))) (* 1/120 (pow (log x.im) 7)))))) (pow (log x.im) 3)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (+ (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))) (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3)))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 8) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (pow (atan2 x.im x.re) 5)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.im) 2))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.im) 4))))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.im) 6))) (* 1/24 (pow (log x.im) 4)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 6))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log x.im) 4)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 4) (atan2 x.im x.re)))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (+ (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 6) (atan2 x.im x.re)))))))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 6))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 8))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 10))) (* 1/120 (pow (log x.im) 8)))))) (pow (log x.im) 4)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* 1/2 (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (pow (log x.im) 2))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 4))) (* 1/2 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 4) (atan2 x.im x.re)))))))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 4))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 6))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 8))) (* 1/120 (pow (log x.im) 6)))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.im 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* 1/120 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5)))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.im 2) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 7))) (* 1/120 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 5))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (atan2 x.im x.re)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* 1/24 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (atan2 x.im x.re)) (* (pow y.im 2) (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6) (atan2 x.im x.re))))) (* 1/24 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* 1/24 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re)))))) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow y.im 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6) (atan2 x.im x.re)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4) (atan2 x.im x.re))))))) (atan2 x.im x.re))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 1))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* 1/24 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 6))) (* 1/24 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 4)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 3)) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1/6 (* (pow y.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)) (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (pow y.im 3))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (pow y.im 2))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* y.im (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im)) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* y.im (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))) y.im)) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) #s(hole binary64 (* -1 (* y.im (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))))) y.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* -1 (/ (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) y.im))) y.im)) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) y.im)))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) y.im)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) y.im)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 x.re x.im)
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
x.re
(*.f64 x.im x.im)
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))
(fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))
(+.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(literal -1/2 binary64)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(log.f64 (hypot.f64 x.im x.re))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 x.im x.re)
#s(literal 2 binary64)
(*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))
#s(literal -1/6 binary64)
(*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
#s(literal 3 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(+.f64 (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.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 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 x.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
(+.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 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
(+.f64 (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.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 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.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)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
(+.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 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(+.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(literal -1 binary64)
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
(pow.f64 (hypot.f64 x.im x.re) y.re)
(fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(+.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))))
(*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))
(*.f64 (atan2.f64 x.im x.re) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(literal 1 binary64)
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 x.re x.im)
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
(+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
(sin.f64 (*.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.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))
(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 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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.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))))
(*.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)))
(+.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))
(/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (* x.re x.re) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 x.im)) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (neg (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (*.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))))
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.im y.re)) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))) (pow.f64 x.im y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im #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 3 binary64)) (pow.f64 x.im y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (/.f64 (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.im) (pow.f64 x.im y.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (log.f64 x.im) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (neg (atan2 x.im x.re)) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.im))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 y.im (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) x.im))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.im #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
#s(approx (pow x.re 2) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.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 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)))) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (/.f64 (*.f64 y.im (log.f64 x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.re)
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (pow.f64 x.re #s(literal 2 binary64)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) 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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im 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 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (pow.f64 x.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) 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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* x.im x.im) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (log.f64 x.re)) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (pow (log x.im) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (pow (log x.im) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (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 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.re y.re)) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (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 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) (pow.f64 x.re y.re)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))) (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 3 binary64)) (pow.f64 x.re y.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))))))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.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 x.re y.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.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 x.re y.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.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 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (/.f64 (*.f64 (log.f64 x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.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 x.re y.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 x.re) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (log.f64 x.re) (pow.f64 x.re y.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (log.f64 x.re) (pow.f64 x.re y.re))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (log.f64 x.re) (*.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 y.im (log.f64 x.re)))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.im (log.f64 x.re))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 y.im (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) x.re))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (/.f64 #s(literal 1 binary64) (pow.f64 x.re #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) x.re))))))
#s(approx (pow x.im 2) (pow.f64 x.im #s(literal 2 binary64)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.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 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 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 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 2 binary64))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 2 binary64))) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)))) (/.f64 (*.f64 y.im (log.f64 x.re)) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (/.f64 (*.f64 y.im (log.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.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.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (* y.im (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (pow (log x.im) 2) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (pow (log x.im) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal 1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64))))
#s(approx (pow (log x.im) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (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)))))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.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 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64))))
#s(approx (pow (log x.im) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 3 binary64)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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))))) (atan2.f64 x.im x.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re))) (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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal 1/4 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/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))))))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (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 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.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 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/4 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/12 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) 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))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/12 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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (+.f64 (/.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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 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 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 3 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 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) 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 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (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 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (fma.f64 #s(literal -1/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 (atan2.f64 x.im x.re) #s(literal 2 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)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 x.im #s(literal 2 binary64))))))))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (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))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))) (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 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.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))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 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 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 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 6 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.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 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (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 #s(literal 1/2 binary64) (/.f64 (*.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.im))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (pow.f64 x.im #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 y.re #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.re) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 x.re #s(literal 2 binary64)) (pow.f64 x.im #s(literal 2 binary64))))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.re (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 2 binary64))) (fma.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (atan2.f64 x.im x.re) (+.f64 (/.f64 (*.f64 (-.f64 (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (-.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (*.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 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (-.f64 (+.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (pow.f64 x.im #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re)))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re)))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 2 binary64)) y.re))))))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 2 binary64)) y.im) (*.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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (*.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal 1/12 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/144 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/4320 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (fma.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 y.im (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))) (*.f64 #s(literal 1/24 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (pow.f64 (log.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 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (log.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 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (fma.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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)) (fma.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)) (fma.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)) (fma.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 (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re 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))) (log (sqrt (+ (* x.im x.im) (* x.re 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 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re 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 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (atan2.f64 x.im x.re))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im 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))) (atan2.f64 x.im x.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) 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 (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))) (pow.f64 (log.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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 4 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (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 4 binary64)) (atan2.f64 x.im x.re))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.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)) (atan2.f64 x.im x.re))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (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)) (atan2.f64 x.im 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))) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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 y.re (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #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))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (fma.f64 #s(literal 1/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 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.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 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 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 5 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 6 binary64))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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)))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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 4 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.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 5 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 6 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 5 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.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))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 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 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (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)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow.f64 (log.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))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (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 3 binary64)))) (pow.f64 (log.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))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal 1/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 3 binary64))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 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 3 binary64)))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))) (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (*.f64 #s(literal -1 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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.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 (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (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) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.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)))))) y.re))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))) y.re))
#s(approx (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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)))))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 y.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 y.re #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 y.re #s(literal 2 binary64))))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (pow.f64 y.re #s(literal 2 binary64))) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (pow.f64 y.re #s(literal 2 binary64)))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re 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 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (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 (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.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))))
#s(approx (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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)))
#s(approx (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 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)))
#s(approx (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))
#s(approx (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.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)))
#s(approx (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) 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 (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))))
#s(approx (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.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)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.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)))))))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (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))))))) 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 (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 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.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 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.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 (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) y.re) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re))))) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) y.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) y.re))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))) y.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 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))))))) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (log.f64 (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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 7 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (log.f64 x.im)))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)))))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 5 binary64))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 7 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 9 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 7 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 8 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (cos (* y.im (log x.im))) #s(literal 1 binary64))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))))))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 8 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 10 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 8 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (atan2.f64 x.im x.re))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 4 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 8 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (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) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (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) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 #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) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64)))))))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 5 binary64))))))))))
#s(approx (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 6 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/24 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re))))) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (fma.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 6 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)) (atan2.f64 x.im x.re)))))) (atan2.f64 x.im x.re)))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) #s(literal 1 binary64))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64))))))))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/720 binary64) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 4 binary64)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 3 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 3 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 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 3 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (+.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 y.im #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 3 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 3 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 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 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 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 3 binary64))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 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 3 binary64)))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 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 3 binary64)))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #s(literal 3 binary64))))))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64)))))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im)))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.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 (*.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))) y.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (*.f64 y.re (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im))))
#s(approx (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin.f64 (*.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 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re)))
#s(approx (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (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 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 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 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) y.im) (*.f64 #s(literal 1/6 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 3 binary64))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (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 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im) (*.f64 #s(literal 1/6 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 3 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 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 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im)) y.im) (*.f64 #s(literal 1/6 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 3 binary64))))))))
#s(approx (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im) (*.f64 #s(literal -1/6 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 3 binary64)))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal 1/6 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 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.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))) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.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))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) y.im))))) y.im))))))
#s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.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)) y.im))) y.im) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))))) y.im))))))
#s(approx (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) y.im))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (*.f64 (pow.f64 y.im #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) y.im))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))))))
#s(approx (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))) y.im))))))
#s(approx (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))))) y.im))))))
#s(approx (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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))) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.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) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))

eval1.9s (1.4%)

Memory
-163.5MiB live, 1 532.0MiB allocated; 1.5s collecting garbage
Compiler

Compiled 1 271 638 to 37 307 computations (97.1% saved)

prune52.5s (39.9%)

Memory
163.1MiB live, 47 933.6MiB allocated; 2.0s collecting garbage
Pruning

15 alts after pruning (9 fresh and 6 done)

PrunedKeptTotal
New4 48864 494
Fresh336
Picked235
Done033
Total4 493154 508
Accuracy
97.1%
Counts
4 508 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.3%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.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))))
✓83.9%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
▶36.5%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
32.0%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)))) y.re) (atan2.f64 x.im x.re))))))
▶34.4%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
46.5%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
▶63.2%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
✓48.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
▶18.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
✓20.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
✓17.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
23.7%
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
✓46.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
✓21.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
▶13.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Compiler

Compiled 2 845 to 1 175 computations (58.7% saved)

series546.0ms (0.4%)

Memory
25.5MiB live, 530.3MiB allocated; 49ms collecting garbage
Counts
119 → 1 278
Calls
Call 1
Inputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
(*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
(pow.f64 y.re #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(literal -1 binary64)
(/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re)
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal -1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 x.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))
(/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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 (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)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))
(pow.f64 y.im #s(literal 3 binary64))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)
(*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 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 3 binary64)))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))
(/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
(pow.f64 y.im #s(literal 2 binary64))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
(*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
(*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))
(/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)
(/.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #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) x.im))
(*.f64 #s(literal -1 binary64) x.im)
(*.f64 (atan2.f64 x.im x.re) y.re)
Outputs
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im)) (/ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) y.im))) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im) (/ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) y.im))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im)))) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2)))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) (pow y.im 2)))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (* (pow x.im 4) y.re))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (* (pow x.im 6) y.re))) (* 1/4 (/ 1 (* (pow x.im 4) y.re))))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log x.im) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (log x.im) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (* (pow x.im 4) y.re))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (/ (log x.im) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (* (pow x.im 6) y.re))) (* 1/4 (/ 1 (* (pow x.im 4) y.re))))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (/ (log x.im) y.re))))
#s(approx (/ (atan2 x.im x.re) y.im) #s(hole binary64 (/ (atan2 x.im x.re) y.im)))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow y.im 2)))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ 1 x.re)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow y.im 2)))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ -1 x.re)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (log x.im) (sin (* y.im (log x.im))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im)) (/ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) y.im))) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im) (/ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) y.im))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im)))) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2)))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) (pow y.im 2)))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (* (pow x.re 4) y.re))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (* (pow x.re 6) y.re))) (* 1/4 (/ 1 (* (pow x.re 4) y.re))))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log x.re) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (log x.re) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (* (pow x.re 4) y.re))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (/ (log x.re) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (* (pow x.re 6) y.re))) (* 1/4 (/ 1 (* (pow x.re 4) y.re))))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (/ (log x.re) y.re))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)) (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)) (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow y.im 2)))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow y.im 2)))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ -1 x.im)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (pow y.re 2) #s(hole binary64 (pow y.re 2)))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (pow y.re 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (pow y.re 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (pow y.re 2))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (pow y.re 2)))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (pow y.re 2))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow y.im 3) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) y.im)) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/12 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) y.im))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) y.im)) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)) y.im)) (* 1/120 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) y.im)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)) y.im)) (* (pow y.re 2) (+ (* -1/5040 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))) y.im)) (* 1/120 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)) y.im)))))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/144 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))) (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2)))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/144 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))) (+ (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2))) (* (pow y.re 2) (+ (* -1/720 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)) (pow y.im 2))) (* 1/4320 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow y.im 2))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/24 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow y.im 2))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* (pow y.re 2) (+ (* -1/720 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (pow y.im 2))) (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (+ (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (pow y.re 3)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (atan2 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* -1 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* -1 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))) (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)))) (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))) (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)))) (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)) (* y.im (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)) (* y.im (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)) (* y.im (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re))))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re)))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))) (+ (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))) (* y.im (+ (* -1 (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (* -1 (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 7) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* -1/6 (* (pow y.im 2) (pow (log x.im) 3)))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 5)))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 7))) (* 1/120 (pow (log x.im) 5))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3)))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 3) (atan2 x.im x.re)))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 5) (atan2 x.im x.re)))))))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 5))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 7))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 9))) (* 1/120 (pow (log x.im) 7)))))) (pow (log x.im) 3)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.im) 2))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.im) 4))))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.im) 6))) (* 1/24 (pow (log x.im) 4)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (atan2 x.im x.re) y.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)))) (* -1 (/ (atan2 x.im x.re) y.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))))) (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))))))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))))) (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))))))))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (atan2 x.im x.re) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (/ (atan2 x.im x.re) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (+ (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))) (/ (pow (log x.im) 2) y.re)))) (/ (atan2 x.im x.re) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (+ (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)) (* y.im (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re)))))))) (/ (pow (log x.im) 2) y.re)))) (/ (atan2 x.im x.re) y.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (pow (log x.im) 2))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 4))) (* 1/2 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 4) (atan2 x.im x.re)))))))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 4))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 6))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 8))) (* 1/120 (pow (log x.im) 6)))))) (pow (log x.im) 2)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3)))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 8) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (pow (atan2 x.im x.re) 5)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 6))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log x.im) 4)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 4) (atan2 x.im x.re)))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (+ (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 6) (atan2 x.im x.re)))))))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 6))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 8))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 10))) (* 1/120 (pow (log x.im) 8)))))) (pow (log x.im) 4)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* 1/2 (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow y.im 3) #s(hole binary64 (pow y.im 3)))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (/ (+ (* -1/6 (* (pow y.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (pow y.im 2) #s(hole binary64 (pow y.im 2)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 3)) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))) y.im)) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
Calls

12 calls:

TimeVariablePointExpression
46.0ms
y.re
@-inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (pow y.re 2) 2 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.im) (* (atan2 x.im x.re) y.re))
40.0ms
x.im
@-inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (pow y.re 2) 2 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.im) (* (atan2 x.im x.re) y.re))
40.0ms
y.im
@-inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (pow y.re 2) 2 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.im) (* (atan2 x.im x.re) y.re))
38.0ms
y.im
@inf
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (pow y.re 2) 2 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.im) (* (atan2 x.im x.re) y.re))
38.0ms
y.re
@0
((* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (neg (atan2 x.im x.re)) y.im) (neg (atan2 x.im x.re)) (atan2 x.im x.re) y.im (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (atan2 x.im x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (pow y.re 2) 2 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (exp (neg (* y.im (atan2 x.im x.re)))) (neg (* y.im (atan2 x.im x.re))) (* y.im (atan2 x.im x.re)) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (sin (* y.im (log x.im))) (* y.im (log x.im)) (log x.im) (pow (atan2 x.im x.re) 2) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (pow (log x.im) 2) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (* (log x.im) (atan2 x.im x.re)) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (* (log x.im) (sin (* y.im (log x.im)))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (atan2 x.im x.re) 3) 3 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (pow (log x.im) 3) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (* (pow (log x.im) 2) (atan2 x.im x.re)) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (* (atan2 x.im x.re) y.im) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sqrt (+ (pow x.im 2) (pow x.re 2))) (+ (pow x.im 2) (pow x.re 2)) (pow x.im 2) (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im) (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* -1 x.im) (* (atan2 x.im x.re) y.re))

rewrite538.0ms (0.4%)

Memory
22.4MiB live, 499.0MiB allocated; 57ms collecting garbage
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
06757137845
07014136006
08822123746
Stop Event
1×iter limit
1×node limit
1×iter limit
Counts
1 397 → 1 506
Calls
Call 1
Inputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
(*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
(pow.f64 y.re #s(literal 2 binary64))
#s(literal 2 binary64)
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(literal -1 binary64)
(/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re)
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal -1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 x.im)
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))
(/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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 (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)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
#s(literal 3 binary64)
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))
(sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
(*.f64 (atan2.f64 x.im x.re) y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))))
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))
(pow.f64 y.im #s(literal 3 binary64))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))))
(/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)
(*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64))
(log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))
(+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))
(pow.f64 x.im #s(literal 2 binary64))
(pow.f64 x.re #s(literal 2 binary64))
(fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 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 3 binary64)))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64))
(/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64)))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))
(pow.f64 y.im #s(literal 2 binary64))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
(*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
(*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))
(/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re)
(/.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #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) x.im))
(*.f64 #s(literal -1 binary64) x.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) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))) (pow x.im 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (neg (atan2 x.im x.re)) y.im) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (neg (atan2 x.im x.re)) #s(hole binary64 (* -1 (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (+ (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.im)))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.im)))) (pow x.im 4)))) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.im)))) (pow x.im 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.im)))) (pow x.im 6))) (* (sin (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.im))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (neg (* y.im (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))
#s(approx (pow (atan2 x.im x.re) 2) #s(hole binary64 (pow (atan2 x.im x.re) 2)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))))
#s(approx (pow (atan2 x.im x.re) 3) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (* (pow x.re 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* y.im (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))))))))) (* (pow x.re 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow x.re 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im)) (/ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) y.im))) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) y.im) (/ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))) y.im))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) y.im)))) (/ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.re 2) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (pow x.re 2) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))) (+ (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))) (* (pow x.re 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 6) (pow y.im 2)))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (* (pow x.re 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (/ (pow (log x.im) 2) (pow x.im 2)))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (pow (log x.im) 2) (pow x.im 2))) (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow (log x.im) 2) (pow x.im 4))) (+ (* 1/2 (/ (log x.im) (pow x.im 4))) (+ (* (log x.im) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/4 (/ (log x.im) (pow x.im 6))) (+ (* 1/6 (/ (pow (log x.im) 2) (pow x.im 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))) (pow x.im 2))) (* (log x.im) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))))))) (/ (pow (log x.im) 2) (pow x.im 2))))) (pow (log x.im) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 2) (pow y.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.im 4) (pow y.im 2)))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 6) (pow y.im 2)))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))) (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (* (pow x.im 4) y.re))) (* 1/2 (/ y.im (* (pow x.im 2) y.re))))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (* (pow x.im 2) y.re))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (* (pow x.im 4) y.re))) (* 1/6 (/ (* (pow x.re 2) y.im) (* (pow x.im 6) y.re))))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (* (pow x.im 4) y.re))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (* (pow x.im 6) y.re))) (* 1/4 (/ 1 (* (pow x.im 4) y.re))))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (+ (/ (log x.im) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log x.im) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (log x.im) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (* (pow x.im 4) y.re))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (/ (log x.im) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (* (pow x.im 6) y.re))) (* 1/4 (/ 1 (* (pow x.im 4) y.re))))) (* 1/2 (/ 1 (* (pow x.im 2) y.re))))) (/ (log x.im) y.re))))
#s(approx (/ (atan2 x.im x.re) y.im) #s(hole binary64 (/ (atan2 x.im x.re) y.im)))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow y.im 2)))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ 1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ 1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ 1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ 1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ 1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ 1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ 1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ 1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ 1 x.re)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))) (pow x.re 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.re))))))) (pow x.re 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.re))))))))) (atan2 x.im x.re))) (pow x.re 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.re)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (atan2 x.im x.re))) (pow x.re 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))))) (pow x.re 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))))))))) (pow x.re 6)) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))))) (* 1/2 (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow y.im 2)))))) (pow x.re 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))))))) (pow x.re 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.re 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (* (pow x.re 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (* (pow x.re 4) y.im)) (/ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.re)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (+ (* 1/4 (* (pow x.im 6) (log (/ -1 x.re)))) (* 1/2 (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))))))) (pow x.re 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (+ (* -1/2 (* (pow x.im 4) (log (/ -1 x.re)))) (* -1/4 (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)))))) (pow x.re 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.im 2) (pow (log (/ -1 x.re)) 2))) (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)))) (pow x.re 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.re)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* (log (/ -1 x.re)) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))) (+ (* -1 (pow (log (/ -1 x.re)) 3)) (+ (* -1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (pow (log (/ -1 x.re)) 2)) (pow x.re 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.re)) 2) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 6) (log (/ -1 x.re))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2))) (/ (* (pow x.im 2) (pow (log (/ -1 x.re)) 2)) (pow x.re 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.re))) y.re)) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.im 4) y.im) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ -1 x.re)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.re)) y.re)) (+ (* -1/4 (/ (pow x.im 4) (* (pow x.re 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (* (pow x.re 6) y.re))) (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))) (pow x.re 4))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))) (pow x.re 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re)))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.re))) (+ (* y.re (* (cos (* y.im (log x.re))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* y.re (* (sin (* y.im (log x.re))) (atan2 x.im x.re)))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (* y.im (log x.re)))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 4))) (+ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (* y.im (log x.re)))) (pow x.re 4)))) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (* y.im (log x.re)))) (pow x.re 6))) (+ (* y.re (* (- (* 1/8 (/ (* (pow y.im 2) (cos (* y.im (log x.re)))) (pow x.re 6))) (* (sin (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (atan2 x.im x.re))) (* (cos (* y.im (log x.re))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (log x.im))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 2) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (log x.im) (sin (* y.im (log x.im))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log x.im) 3) (sin (* y.im (log x.im))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (log x.im) 3)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))) (* (pow x.im 2) (+ (* y.im (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* y.im (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))))))))) (* (pow x.im 2) (+ (* y.im (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow x.im 2) (* y.im (+ (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 6))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2)))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im)) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2))))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) y.im)) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im)) (/ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) y.im))) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) y.im) (/ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))) y.im))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) y.im)))) (/ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (pow x.im 2) (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (* y.re (atan2 x.im x.re))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx (pow x.im 2) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))) (+ (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))) (* (pow x.im 2) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))) (* 1/6 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 6) (pow y.im 2)))))))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.re) 3)) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (* (pow x.im 2) (+ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (* (pow x.im 2) (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))))))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (pow (log x.re) 3)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (/ (pow (log x.re) 2) (pow x.re 2)))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (pow (log x.re) 2) (pow x.re 2))) (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow (log x.re) 2) (pow x.re 4))) (+ (* 1/2 (/ (log x.re) (pow x.re 4))) (+ (* (log x.re) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/4 (/ (log x.re) (pow x.re 6))) (+ (* 1/6 (/ (pow (log x.re) 2) (pow x.re 6))) (+ (* 1/2 (/ (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))) (pow x.re 2))) (* (log x.re) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))))))) (/ (pow (log x.re) 2) (pow x.re 2))))) (pow (log x.re) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (pow y.im 2)))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 4) (pow y.im 2)))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 2) (pow y.im 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (* (pow x.re 4) (pow y.im 2)))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.re 6) (pow y.im 2)))))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (cos (* y.re (atan2 x.im x.re))) (log x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* (cos (* y.re (atan2 x.im x.re))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.re (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))) (+ (/ (* y.im (log x.re)) y.re) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (* (pow x.re 2) y.re))) (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (* (pow x.re 4) y.re))) (* 1/2 (/ y.im (* (pow x.re 2) y.re))))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (* (pow x.re 2) y.re))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (* (pow x.re 4) y.re))) (* 1/6 (/ (* (pow x.im 2) y.im) (* (pow x.re 6) y.re))))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (* (pow x.re 4) y.re))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (* (pow x.re 6) y.re))) (* 1/4 (/ 1 (* (pow x.re 4) y.re))))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (+ (/ (log x.re) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log x.re) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (pow x.im 2) (* (pow x.re 2) y.re))) (/ (log x.re) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (* (pow x.re 4) y.re))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (/ (log x.re) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (* (pow x.re 6) y.re))) (* 1/4 (/ 1 (* (pow x.re 4) y.re))))) (* 1/2 (/ 1 (* (pow x.re 2) y.re))))) (/ (log x.re) y.re))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ 1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ 1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ 1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* y.re (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* y.re (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)) (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)) (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))) (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* -1 (* y.im (log (/ 1 x.im))))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re)))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* -1 (* y.im (log (/ 1 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (atan2 x.im x.re))))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (atan2 x.im x.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (+ (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (* (sin (* -1 (* y.im (log (/ 1 x.im))))) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))) (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im))))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* -1 (* (pow (log (/ 1 x.im)) 3) (sin (* -1 (* y.im (log (/ 1 x.im)))))))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* -1 (* y.im (log (/ 1 x.im))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* -1 (* y.im (log (/ 1 x.im))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow y.im 2)))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ 1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ 1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ 1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ 1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ 1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ 1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ 1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ 1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ 1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ 1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ 1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ 1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ 1 x.im)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ 1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))) (pow x.im 2))) (+ (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (* -1 (* y.im (log (/ -1 x.im))))))) (pow x.im 2))) (+ (* y.re (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (atan2 x.im x.re))) (+ (/ (* y.re (* (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (* -1 (* y.im (log (/ -1 x.im))))))))) (atan2 x.im x.re))) (pow x.im 4)) (+ (/ (* y.re (* (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (* -1 (* y.im (log (/ -1 x.im)))))))) (* (sin (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (atan2 x.im x.re))) (pow x.im 6)) (/ (* (cos (* -1 (* y.im (log (/ -1 x.im))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (- (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (atan2 x.im x.re) 2))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.im (log x.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))) (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2))))
#s(approx (pow (log x.im) 2) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) #s(hole binary64 (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (atan2 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (+ (log -1) (* -1 (log (/ -1 x.im)))) (pow (atan2 x.im x.re) 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))) (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3))))
#s(approx (pow (log x.im) 3) #s(hole binary64 (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 3)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (cos (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) #s(hole binary64 (* (pow (+ (log -1) (* -1 (log (/ -1 x.im)))) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (+ (log -1) (* -1 (log (/ -1 x.im)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))) (* 1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))) (+ (/ (* y.im (+ (* -1/4 (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))))) (pow x.im 4)) (+ (/ (* y.im (+ (* 1/720 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* y.im (+ (* -1/2 (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))))))))) (pow x.im 6)) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re))))) (* y.im (+ (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))))) (* 1/2 (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* (pow y.im 3) (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))))))) (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow y.im 2)))))) (pow x.im 6)) (+ (/ (* (pow y.im 3) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))))))) (pow x.im 4)) (/ (* (pow y.im 3) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) y.im))))) (pow x.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im)))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im))) (+ (* -1/2 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) y.im))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (* (pow x.im 6) y.im)) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (* (pow x.im 4) y.im)) (/ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) y.im))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (* y.re (atan2 x.im x.re)))) (+ (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4))) (+ (* -1/6 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (/ -1 x.im)) 3))) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (+ (* 1/720 (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (+ (* 1/4 (* (pow x.re 6) (log (/ -1 x.im)))) (* 1/2 (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))))))) (pow x.im 6)) (+ (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* -1 (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (+ (* -1/2 (* (pow x.re 4) (log (/ -1 x.im)))) (* -1/4 (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)))))) (pow x.im 4)) (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 1/2 (* (pow x.re 2) (pow (log (/ -1 x.im)) 2))) (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)))) (pow x.im 2)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (* -1 (pow (log (/ -1 x.im)) 3))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) #s(hole binary64 (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* (log (/ -1 x.im)) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))) (+ (* -1 (pow (log (/ -1 x.im)) 3)) (+ (* -1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (pow (log (/ -1 x.im)) 2)) (pow x.im 4))) (+ (* 1/720 (/ (* (pow (log (/ -1 x.im)) 2) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 6) (log (/ -1 x.im))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2))) (/ (* (pow x.re 2) (pow (log (/ -1 x.im)) 2)) (pow x.im 2)))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))) (pow y.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 4) (pow y.im 2)))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) (pow y.im 2)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (pow y.im 2)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (atan2 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (/ (* y.im (log (/ -1 x.im))) y.re)) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (atan2 x.im x.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1/4 (/ (* (pow x.re 4) y.im) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (* (pow x.im 2) y.re))) (* y.im (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (+ (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))) (/ (atan2 x.im x.re) y.im)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (* -1 (/ (log (/ -1 x.im)) y.re))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re)))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (+ (* -1 (/ (log (/ -1 x.im)) y.re)) (+ (* -1/4 (/ (pow x.re 4) (* (pow x.im 4) y.re))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (* (pow x.im 6) y.re))) (* 1/2 (/ (pow x.re 2) (* (pow x.im 2) y.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))))
#s(approx (pow y.re 2) #s(hole binary64 (pow y.re 2)))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (pow y.re 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (pow y.re 2))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (/ (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (pow y.re 2))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (pow y.re 2)))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (pow y.re 2))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (/ (+ (* -1 (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (+ (* y.re (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))) (atan2 x.im x.re)))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.im (* y.re (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/6 (* (pow y.im 2) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))) (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/12 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* -1/2 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow y.im 3) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* 1/12 (* (pow y.im 2) (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* (pow y.im 3) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))))) (* (pow y.im 3) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) y.im)) (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* y.re (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)) (* y.re (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/12 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) y.im))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* -1/6 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) y.im)) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)) y.im)) (* 1/120 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))) y.im)))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)) y.im)) (* (pow y.re 2) (+ (* -1/5040 (/ (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7))) y.im)) (* 1/120 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)) y.im)))))) (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5)))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 5))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/144 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))) (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2)))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (+ (* 1/12 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/144 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))) (+ (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2))) (* (pow y.re 2) (+ (* -1/720 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)) (pow y.im 2))) (* 1/4320 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6))))))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* -1/2 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (atan2 x.im x.re) 4))))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.re 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/24 (* (pow y.re 2) (pow (atan2 x.im x.re) 4))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* (pow y.re 2) (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (pow (atan2 x.im x.re) 6))) (* 1/24 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* -1/2 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (pow y.im 2))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* 1/24 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))) (pow y.im 2))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (+ (* (pow y.re 2) (+ (* -1/2 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)) (pow y.im 2))) (* (pow y.re 2) (+ (* -1/720 (/ (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6))) (pow y.im 2))) (* 1/24 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)) (pow y.im 2))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* 1/24 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow y.re 2) (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (* (pow y.re 2) (+ (* -1/720 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 6)))) (* 1/24 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 4))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))) y.re)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) #s(hole binary64 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* (pow y.re 3) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (+ (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (pow y.re 3)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2)))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re)))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) y.re)) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (+ (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) y.re)) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) y.re) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (pow y.re 2)) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (pow y.re 2))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) #s(hole binary64 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (atan2 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (* -1 (/ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re)))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* -1 (* (pow y.re 3) (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (* -1 (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) y.re)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (+ (/ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) y.re) (/ (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) y.re))))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.im (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* -1/6 (* y.im (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (atan2 x.im x.re) (pow x.im y.re))))) (+ (* -1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 3) (pow x.im y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))))) (* 1/2 (* (pow (log x.im) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log x.im) (pow x.im y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) #s(hole binary64 (+ (* y.im (+ (log x.im) (+ (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.re (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (* y.re (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))))) (* y.re (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))))) (* y.re (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2)))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (+ (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (+ (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))) (* y.re (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.re (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))))) (+ (* y.re (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.re (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))))) (pow (log x.im) 2))))) (+ (* y.re (+ (* y.re (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))) (* (log x.im) (atan2 x.im x.re)))) (atan2 x.im x.re)))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))) (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) #s(hole binary64 (+ (* y.im (+ (* y.im (+ (* y.im (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)))) (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))) (* (pow y.re 2) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))) (* (pow y.re 2) (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))) (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))) (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1 (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re)))) (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (/ (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re))) y.re)))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)) (* y.im (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) #s(hole binary64 (+ (* -1 (/ (* (log x.im) (atan2 x.im x.re)) y.re)) (+ (* -1 (/ (atan2 x.im x.re) (pow y.re 2))) (* y.im (+ (* -1 (/ (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)) y.re)) (* y.im (+ (* -1 (/ (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3))) y.re)) (+ (* -1 (/ (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))) y.re)) (* y.im (+ (* -1 (/ (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))) y.re)) (* -1 (/ (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))) y.re))))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* -1 (/ (atan2 x.im x.re) y.re)))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) #s(hole binary64 (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))) (+ (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))) (* y.im (+ (* -1 (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (* -1 (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* (log x.im) (pow (atan2 x.im x.re) 3)))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* -1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))))) (* (log x.im) (pow (atan2 x.im x.re) 3))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3)))))))))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 1))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ 1 (* y.im (+ (* -1 (atan2 x.im x.re)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) #s(hole binary64 (* y.im (+ (* (log x.im) (pow (atan2 x.im x.re) 2)) (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 7) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 5) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* -1/6 (* (pow y.im 2) (pow (log x.im) 3)))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 5)))))))))
#s(approx (sin (* y.im (log x.im))) #s(hole binary64 (* y.im (+ (log x.im) (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 3)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 7))) (* 1/120 (pow (log x.im) 5))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (pow (log x.im) 3)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3)))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (pow (log x.im) 3)) (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* 1/2 (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 3) (atan2 x.im x.re)))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 3)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 5)) (+ (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 5) (atan2 x.im x.re)))))))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 3))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 5))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 7))))) (pow (log x.im) 3)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 5)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 9))) (* 1/120 (pow (log x.im) 7)))))) (pow (log x.im) 3)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 3) (atan2 x.im x.re))) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 3) (pow (atan2 x.im x.re) 2)))))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 1))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* -1/2 (* (pow y.im 2) (pow (log x.im) 2))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* 1/24 (* (pow y.im 2) (pow (log x.im) 4))))))))
#s(approx (cos (* y.im (log x.im))) #s(hole binary64 (+ 1 (* (pow y.im 2) (+ (* -1/2 (pow (log x.im) 2)) (* (pow y.im 2) (+ (* -1/720 (* (pow y.im 2) (pow (log x.im) 6))) (* 1/24 (pow (log x.im) 4)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (* (log x.im) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 2)))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 3)))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (log x.im) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 3))))))) (* (log x.im) (atan2 x.im x.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (* -1 (/ (atan2 x.im x.re) y.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re)))) (* -1 (/ (atan2 x.im x.re) y.re)))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)))))) (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))))))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) #s(hole binary64 (+ (* -1 (/ (atan2 x.im x.re) y.re)) (* y.im (+ (* -1 (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (* y.im (+ (* -1 (* y.im (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re))))) (* -1 (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))))))))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (/ (atan2 x.im x.re) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (/ (pow (log x.im) 2) y.re))) (/ (atan2 x.im x.re) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (+ (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re))))) (/ (pow (log x.im) 2) y.re)))) (/ (atan2 x.im x.re) y.re))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (pow (atan2 x.im x.re) 2) y.re)) (+ (* y.im (+ (* -1 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* -1/2 (/ (* (pow (log x.im) 2) (atan2 x.im x.re)) y.re)) (+ (* 1/2 (/ (pow (atan2 x.im x.re) 3) y.re)) (* y.im (+ (* -1/6 (/ (pow (log x.im) 4) y.re)) (+ (* -1/6 (/ (pow (atan2 x.im x.re) 4) y.re)) (/ (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)) y.re)))))))) (/ (pow (log x.im) 2) y.re)))) (/ (atan2 x.im x.re) y.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (pow (log x.im) 2))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* 1/2 (pow (atan2 x.im x.re) 3))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (+ (* 1/2 (pow (atan2 x.im x.re) 3)) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* -1/6 (pow (atan2 x.im x.re) 4)) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))))) (pow (log x.im) 2)))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 3))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 2)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 4))) (* 1/2 (pow (atan2 x.im x.re) 3)))))) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (atan2 x.im x.re)))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 4)) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 4) (atan2 x.im x.re)))))))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 2))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 4))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 6))))) (pow (log x.im) 2)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 4)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 8))) (* 1/120 (pow (log x.im) 6)))))) (pow (log x.im) 2)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/2 (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 5))) (* 1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3)))))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* 1/120 (* (pow y.im 2) (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2)))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (* (pow (log x.im) 8) (pow (atan2 x.im x.re) 2)))) (* 1/120 (* (pow (log x.im) 6) (pow (atan2 x.im x.re) 2))))))) (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* 1/6 (pow (atan2 x.im x.re) 4)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) #s(hole binary64 (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (+ (* 1/6 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* -1/6 (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* -1/6 (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))))) (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (+ (* 1/2 (pow (atan2 x.im x.re) 5)) (* y.im (+ (* -1/6 (pow (atan2 x.im x.re) 6)) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))))))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (pow (atan2 x.im x.re) 3)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* -1 (* y.im (pow (atan2 x.im x.re) 4))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* 1/2 (* y.im (pow (atan2 x.im x.re) 5))))) (pow (atan2 x.im x.re) 3))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) #s(hole binary64 (+ (* y.im (+ (* -1 (pow (atan2 x.im x.re) 4)) (* y.im (+ (* -1/6 (* y.im (pow (atan2 x.im x.re) 6))) (* 1/2 (pow (atan2 x.im x.re) 5)))))) (pow (atan2 x.im x.re) 3))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/6 (pow (log x.im) 4)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (+ (* 1/6 (pow (log x.im) 4)) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))) (* y.im (+ (* 1/6 (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))) (* 1/2 (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* -1 (* y.im (* (pow (log x.im) 4) (atan2 x.im x.re)))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))))))) (pow (log x.im) 4)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 6)) (+ (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 6) (atan2 x.im x.re)))))))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (pow (log x.im) 4))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* -1/6 (* (pow y.im 2) (pow (log x.im) 6))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* 1/120 (* (pow y.im 2) (pow (log x.im) 8))))) (pow (log x.im) 4)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (* (pow y.im 2) (+ (* -1/6 (pow (log x.im) 6)) (* (pow y.im 2) (+ (* -1/5040 (* (pow y.im 2) (pow (log x.im) 10))) (* 1/120 (pow (log x.im) 8)))))) (pow (log x.im) 4)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (* (pow (log x.im) 2) (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* 1/2 (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))) (* 1/2 (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/2 (* (pow (log x.im) 4) (atan2 x.im x.re))) (+ (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))) (* y.im (+ (* -1/6 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4))) (* 1/2 (* (pow (log x.im) 4) (pow (atan2 x.im x.re) 2)))))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (* (pow (log x.im) 2) (atan2 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* 1/2 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3)))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* y.im (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 4)))) (* 1/2 (* (pow (log x.im) 2) (pow (atan2 x.im x.re) 3))))))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* -1 (* y.im (* (log x.im) (atan2 x.im x.re))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) #s(hole binary64 (* y.im (+ (log x.im) (* y.im (+ (* -1 (* (log x.im) (atan2 x.im x.re))) (* y.im (+ (* -1/6 (pow (log x.im) 3)) (+ (* 1/2 (* (log x.im) (pow (atan2 x.im x.re) 2))) (* y.im (+ (* -1/6 (* (log x.im) (pow (atan2 x.im x.re) 3))) (* 1/6 (* (pow (log x.im) 3) (atan2 x.im x.re))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (pow y.im 3) #s(hole binary64 (pow y.im 3)))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (/ (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (/ (+ (* -1/6 (* (pow y.im 2) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow y.im 2))))
#s(approx (pow y.im 2) #s(hole binary64 (pow y.im 2)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) #s(hole binary64 (/ (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* y.im (+ (* -1 (atan2 x.im x.re)) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (+ (/ (sin (* y.re (atan2 x.im x.re))) (pow y.im 3)) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1/6 (* (pow y.im 3) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) #s(hole binary64 (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (/ (sin (* y.re (atan2 x.im x.re))) y.im))) y.im)) (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) #s(hole binary64 (* -1 (* (pow y.im 3) (+ (* -1 (/ (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re))))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) y.im)) (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) y.im)) (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re)) (* -1 (/ (atan2 x.im x.re) y.im)))))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(+.f64 (cosh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sinh.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))))
(exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(+.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im)
(neg.f64 (atan2.f64 x.im x.re))
(atan2.f64 x.im x.re)
y.im
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(+.f64 (*.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
(*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
(*.f64 y.re y.re)
(pow.f64 y.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y.re) #s(literal 2 binary64)))
#s(literal 2 binary64)
(fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
(+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(literal -1 binary64)
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))) (neg.f64 y.re))
(/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re)
(fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
(+.f64 (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.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 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(literal -1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(-.f64 (cosh.f64 (*.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
(exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
(*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(sin.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 (pow.f64 x.im y.im))
(log.f64 x.im)
(*.f64 (atan2.f64 x.im x.re) (atan2.f64 x.im x.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
(+.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 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(literal 1/2 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (log.f64 x.im) (log.f64 x.im))
(pow.f64 (log.f64 x.im) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 2 binary64)))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.im (log.f64 x.im))))
(cos.f64 (*.f64 y.im (log.f64 x.im)))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
(*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))
(/.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (neg.f64 y.re))
(/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)
(fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(+.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.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 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
(*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(literal -1/6 binary64)
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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 (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 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (atan2.f64 x.im x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 3 binary64)))
#s(literal 3 binary64)
(fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
(+.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 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(literal 1/6 binary64)
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (log.f64 x.im))
(*.f64 (log.f64 x.im) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
(pow.f64 (log.f64 x.im) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 x.im)) #s(literal 3 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
(*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))
(*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))))))))
(/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))))
(exp.f64 (-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (atan2.f64 x.im x.re) y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))))))
(+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))))
(*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))))
(*.f64 (*.f64 y.im y.im) y.im)
(*.f64 y.im (*.f64 y.im y.im))
(pow.f64 y.im #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 y.im) #s(literal 3 binary64)))
(fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (neg.f64 y.im))
(/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 (hypot.f64 x.im x.re))) #s(literal 2 binary64)))
(log.f64 (hypot.f64 x.im x.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (log.f64 (hypot.f64 x.im x.re)))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 (hypot.f64 x.im x.re))) #s(literal 3 binary64)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (neg.f64 (*.f64 y.im y.im)))
(/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))
(*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 y.im y.im)
(pow.f64 y.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 y.im) #s(literal 2 binary64)))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
(*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
(*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))
(+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))
(/.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (neg.f64 y.re))
(/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re)
(/.f64 (neg.f64 (atan2.f64 x.im x.re)) (neg.f64 y.im))
(/.f64 (atan2.f64 x.im x.re) y.im)
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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))) (*.f64 #s(literal -1 binary64) x.im))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (*.f64 (sin.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) 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))) (*.f64 #s(literal -1 binary64) x.im))) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (*.f64 (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))
(log.f64 #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) x.im))
(*.f64 #s(literal -1 binary64) x.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) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (neg (atan2 x.im x.re)) y.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (neg (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (neg (* y.im (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.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)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (*.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))))
#s(approx (pow (atan2 x.im x.re) 3) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (*.f64 (*.f64 x.re x.re) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)) (*.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (pow x.re 2) (*.f64 x.re x.re))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64)))))))))))))))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))) (*.f64 (*.f64 x.re x.re) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im)))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 (*.f64 x.re x.re) (+.f64 (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im)) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) y.im) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64)))))) y.im)) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) y.im))) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 (*.f64 x.re x.re) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))) (/.f64 (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 x.im)) (*.f64 x.im x.im)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)) (*.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -2 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.im (*.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 x.im x.im))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (pow x.re 2) (*.f64 x.re x.re))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))) (*.f64 (*.f64 x.re x.re) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))) (*.f64 (*.f64 x.re x.re) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #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 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (log.f64 x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -4 binary64)))) (*.f64 x.im x.im)) (*.f64 (log.f64 x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal -6 binary64)))))))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 x.im x.im)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im)))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)) (*.f64 y.im y.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.im) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.im x.im) y.re)))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.im x.im) y.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) y.re) #s(literal -1 binary64)))) (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) y.re) #s(literal -1 binary64)))) (+.f64 (/.f64 (log.f64 x.im) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/.f64 (log.f64 x.im) y.re))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (log.f64 x.im) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) y.re) #s(literal -1 binary64)))) (/.f64 (log.f64 x.im) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 (*.f64 x.re x.re) (fma.f64 (*.f64 x.re x.re) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.im x.im) y.re) #s(literal -1 binary64)))) (/.f64 (log.f64 x.im) y.re)))
#s(approx (/ (atan2 x.im x.re) y.im) (/.f64 (atan2.f64 x.im x.re) y.im))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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 (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (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 (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.re)
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 x.re x.re))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (*.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.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))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.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))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (neg.f64 (log.f64 x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.re))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (*.f64 x.re x.re)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (*.f64 x.re x.re)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))) (*.f64 x.re x.re)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 y.im y.im)))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.re x.re))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 x.re x.re)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)))) (*.f64 x.re x.re))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (*.f64 x.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (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) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/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/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re))))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 4 binary64))))) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 y.im (log.f64 x.re)))) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (atan2.f64 x.im x.re)) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.re))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.im (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (*.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (*.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (pow.f64 y.im #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (pow (log x.im) 2) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (pow (log x.im) 3) (pow.f64 (log.f64 x.im) #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))) (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (*.f64 (*.f64 x.im x.im) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 y.re #s(literal 3 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 y.re (log.f64 x.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (*.f64 x.re x.re)) (*.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (pow x.im 2) (*.f64 x.im x.im))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64)))))))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))))))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))) (*.f64 (*.f64 x.im x.im) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))))))))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im)))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.re x.re) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 (*.f64 x.im x.im) (+.f64 (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im)) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) y.im) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64)))))) y.im)) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (*.f64 x.re x.re) y.im))) (/.f64 (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (*.f64 x.im x.im) (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 (*.f64 x.im x.im) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))) (/.f64 (*.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))) (*.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+.f64 (/.f64 (*.f64 (*.f64 x.im x.im) (log.f64 x.re)) (*.f64 x.re x.re)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)) (*.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -2 binary64)))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+.f64 (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 #s(literal 1/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/2 binary64) (/.f64 (*.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (+.f64 x.re (*.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (pow.f64 x.re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow x.im 2) (*.f64 x.im x.im))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))))))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))) (*.f64 (*.f64 x.im x.im) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))) (*.f64 (*.f64 x.im x.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64))))))))))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (log.f64 x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -4 binary64)))) (*.f64 x.re x.re)) (*.f64 (log.f64 x.re) (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal -6 binary64)))))))))))) (/.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (*.f64 x.re x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im)))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (*.f64 x.re y.im) #s(literal 2 binary64))) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.im y.im))))))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)) (*.f64 y.im y.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 x.re x.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.re x.re) y.re)))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))) (+.f64 (/.f64 (*.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.re x.re) y.re)))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 (*.f64 x.re x.re) y.re)) (*.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 (*.f64 x.im x.im) y.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re)))))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) y.re) #s(literal -1 binary64)))) (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) y.re) #s(literal -1 binary64)))) (+.f64 (/.f64 (log.f64 x.re) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/.f64 (log.f64 x.re) y.re))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (*.f64 x.re x.re) y.re)) (/.f64 (log.f64 x.re) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) y.re) #s(literal -1 binary64)))) (/.f64 (log.f64 x.re) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 (*.f64 x.im x.im) (fma.f64 (*.f64 x.im x.im) (-.f64 (*.f64 #s(literal 1/6 binary64) (/.f64 (*.f64 x.im x.im) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) y.re))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 x.re x.re) y.re) #s(literal -1 binary64)))) (/.f64 (log.f64 x.re) y.re)))
#s(approx (* -1 x.im) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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 (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 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 (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re))) y.re))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))
#s(approx (* y.im (log x.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))
#s(approx (pow (log x.im) 2) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))))))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re)))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (atan2.f64 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))) y.re))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.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)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))))))
#s(approx (pow (log x.im) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (*.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (neg.f64 (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (*.f64 x.im x.im)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (+ (pow x.im 2) (pow x.re 2)) (*.f64 (*.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #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))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #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))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (neg.f64 (log.f64 x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (neg.f64 (log.f64 x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (neg.f64 (log.f64 x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (neg.f64 (log.f64 x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (neg.f64 (log.f64 x.im))) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (neg.f64 (log.f64 x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (*.f64 x.im x.im)) (*.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (*.f64 x.im x.im)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re)) (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 y.re (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))) (*.f64 x.im x.im)) (fma.f64 y.re (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (atan2.f64 x.im x.re)) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.re (*.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))))))) (*.f64 (sin.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(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))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (*.f64 y.re (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.im (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.im #s(literal 3 binary64))) (*.f64 #s(literal 1/720 binary64) (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re))) y.re))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))
#s(approx (sin (* y.im (log x.im))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64))))
#s(approx (pow (log x.im) 2) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (* y.im (log x.im))) (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re))))
#s(approx (* (log x.im) (atan2 x.im x.re)) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))) y.re))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (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)))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.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 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64))))
#s(approx (pow (log x.im) 3) (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 3 binary64)))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (cos.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log x.im) 2) (atan2 x.im x.re)) (*.f64 (pow.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))))
#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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.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) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 y.re (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)) (+.f64 (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (*.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 y.re #s(literal 3 binary64))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal 1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/720 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (*.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 y.im y.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) y.im))))) (*.f64 x.im x.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im))))))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)))))))))))))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (*.f64 x.im x.im) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.im)) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im)) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)) (fma.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 x.im x.im)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) (*.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (fma.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal -1/4 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)))) (*.f64 x.im x.im))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (*.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))
#s(approx (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal -1/360 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) #s(literal 2 binary64)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im)) (/.f64 (pow.f64 (*.f64 x.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) #s(literal 2 binary64)) (*.f64 x.im x.im))))))))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64)))))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.im y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.im y.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (*.f64 y.im y.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (*.f64 x.im y.im) #s(literal 2 binary64))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 x.im x.im)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re)))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re)))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (*.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 x.re x.re) y.im) (*.f64 (*.f64 x.im x.im) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im)))))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re)))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re))))))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) y.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) y.re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 x.re x.re) (*.f64 (*.f64 x.im x.im) y.re)))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (exp.f64 #s(literal -1 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) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (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) (* (neg (atan2 x.im x.re)) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.re y.re)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (pow y.re 2) (*.f64 y.re y.re))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 y.re y.re)))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (/.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 y.re y.re)))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (/.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 y.re y.re)))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 y.re y.re))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) (*.f64 y.re y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (*.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))) 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 (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 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #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 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/12 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.im) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.im) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im)))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) y.im))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.im) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) y.im))) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.im))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) y.im) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) y.im) (*.f64 #s(literal 1/120 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) y.im))))) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/144 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im y.im))))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (fma.f64 #s(literal 1/12 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/144 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im y.im)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/4320 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))))))))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 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) (pow.f64 (*.f64 y.re (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 (*.f64 y.re y.re) (fma.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 (*.f64 y.re y.re) (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 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.re y.re) (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 (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im)))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 y.im y.im)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 y.im y.im)))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (fma.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im y.im)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 y.im y.im)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im y.im)))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im y.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (log.f64 (hypot.f64 x.im x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (/.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) y.re))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) y.re))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/.f64 (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)) y.re))
#s(approx (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (exp.f64 (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (fma.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re) (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 y.re y.re)) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 y.re y.re))))))))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 y.re y.re)) (+.f64 (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) (pow.f64 y.re #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 y.re y.re)))))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 y.re y.re)) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 y.re y.re))))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re)))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 y.re y.re)) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 y.re y.re))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) y.re) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))) y.re) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) (*.f64 y.re y.re)) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 y.re y.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) y.re)))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))))
#s(approx (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))
#s(approx (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))
#s(approx (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (atan2.f64 x.im x.re))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/.f64 (atan2.f64 x.im x.re) y.im))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) y.re) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re))))) y.re))))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.re #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) y.re))))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))) y.re) (/.f64 (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))) y.re))))) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.im y.im)
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.re (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #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 x.im y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (pow.f64 x.im y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im))))) (fma.f64 y.im (+.f64 (log.f64 x.im) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))) (*.f64 y.re (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 y.im (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 y.im (fma.f64 y.im (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (* (pow y.re 2) (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))))) (fma.f64 y.im (fma.f64 y.im (fma.f64 y.im (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re))) y.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))) (*.f64 (*.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))))))
#s(approx (+ (* -1 (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re)) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re))) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re))) y.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))) y.re))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.re y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re)))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.re y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re))))))))))
#s(approx (/ (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (*.f64 y.re y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re))) y.re)))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))))))))))))
#s(approx (+ (* -1 (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))))) (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re))) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re)))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64))))))))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) #s(literal 1 binary64))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))
#s(approx (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (*.f64 y.im (fma.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 7 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (log.f64 x.im)))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)))))))))
#s(approx (sin (* y.im (log x.im))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64))))))))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 5 binary64))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 7 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (pow (log x.im) 2) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 5 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 9 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 7 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (cos (* y.im (log x.im))) #s(literal 1 binary64))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 y.im (log.f64 x.im)) #s(literal 2 binary64)))))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))))))
#s(approx (cos (* y.im (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re))) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re))))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)))))))
#s(approx (* -1 (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.re) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re)))) (*.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))))))))))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.re))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re)) (/.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re)))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re))) (/.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (/ (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) y.re) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) y.re) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) y.re) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) y.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) y.re) (/.f64 (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) y.re))))))) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) y.re))) (/.f64 (atan2.f64 x.im x.re) y.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (atan2.f64 x.im x.re))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im)))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (atan2.f64 x.im x.re))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 4 binary64))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 8 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))))))
#s(approx (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 8 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (*.f64 #s(literal 1/120 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))))))
#s(approx (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (fma.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (*.f64 y.im (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (atan2.f64 x.im x.re))))))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (pow.f64 (log.f64 x.im) #s(literal 4 binary64))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 6 binary64))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 8 binary64))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* (pow (log x.im) 3) (sin (* y.im (log x.im)))) (*.f64 y.im (fma.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 6 binary64)) (*.f64 (*.f64 y.im y.im) (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 y.im y.im) (pow.f64 (log.f64 x.im) #s(literal 10 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (log.f64 x.im) #s(literal 8 binary64)))))) (pow.f64 (log.f64 x.im) #s(literal 4 binary64)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))
#s(approx (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal 1/2 binary64) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (atan2.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 4 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (log.f64 x.im)))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (* y.im (log x.im)))) (*.f64 y.im (+.f64 (log.f64 x.im) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (fma.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (atan2.f64 x.im x.re)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 #s(literal 1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (pow y.im 3) (pow.f64 y.im #s(literal 3 binary64)))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 y.im (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im y.im)))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (/.f64 (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im y.im)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 y.im y.im) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (*.f64 y.im y.im)))
#s(approx (pow y.im 2) (*.f64 y.im y.im))
#s(approx (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im)) (/.f64 (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)) y.im))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (+.f64 (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 y.im #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 y.im y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 #s(literal -1/6 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(approx (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.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 (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 y.im (+.f64 (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) y.im)) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))
#s(approx (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) y.im))) y.im) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) y.im)) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im))))))
#s(approx (* (pow y.im 3) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) y.im)) y.im) (*.f64 #s(literal 1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))))
#s(approx (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))) y.im)) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (/ (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (pow y.im 2)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) y.im) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))) y.im) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))
#s(approx (* y.im (+ (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) y.re) (/ (atan2 x.im x.re) y.im))) (*.f64 #s(literal -1 binary64) (*.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (hypot.f64 x.im x.re)) y.re) (*.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) y.im))))))

eval503.0ms (0.4%)

Memory
-11.7MiB live, 452.3MiB allocated; 78ms collecting garbage
Compiler

Compiled 701 314 to 19 330 computations (97.2% saved)

prune17.5s (13.3%)

Memory
-73.8MiB live, 14 446.9MiB allocated; 1.8s collecting garbage
Pruning

14 alts after pruning (6 fresh and 8 done)

PrunedKeptTotal
New2 60442 608
Fresh224
Picked235
Done156
Total2 609142 623
Accuracy
97.1%
Counts
2 623 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
35.3%
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.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))))
✓83.9%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
✓36.5%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
32.0%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)))) y.re) (atan2.f64 x.im x.re))))))
55.1%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))))))
31.6%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
78.4%
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
✓48.5%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
✓18.6%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
✓20.4%
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
22.9%
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
✓46.7%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
✓21.0%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
✓13.5%
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Compiler

Compiled 5 533 to 1 248 computations (77.4% saved)

regimes93.0ms (0.1%)

Memory
13.9MiB live, 62.4MiB allocated; 53ms collecting garbage
Counts
31 → 1
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)))) y.re) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.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 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (/.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
Calls

5 calls:

59.0ms
x.re
8.0ms
x.im
8.0ms
y.im
8.0ms
y.re
7.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
83.9%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
83.9%1x.re
83.9%1x.im
83.9%1y.re
83.9%1y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes40.0ms (0%)

Memory
11.8MiB live, 59.2MiB allocated; 1ms collecting garbage
Counts
29 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)))) y.re) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.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 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

5 calls:

8.0ms
x.im
8.0ms
x.re
8.0ms
y.im
8.0ms
y.re
6.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
78.4%1x.re
81.1%2y.im
82.3%2x.im
80.4%2y.re
80.1%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes19.0ms (0%)

Memory
-20.9MiB live, 26.5MiB allocated; 1ms collecting garbage
Counts
28 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (*.f64 y.re (*.f64 (cos.f64 (*.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) x.im)) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (/.f64 (fma.f64 (log.f64 (hypot.f64 x.im x.re)) y.im (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.re y.im))))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (*.f64 y.im (log.f64 #s(approx (sqrt (+ (pow x.im 2) (pow x.re 2))) (*.f64 #s(literal -1 binary64) x.re)))) y.re) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.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))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.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))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
Calls

2 calls:

8.0ms
y.im
7.0ms
x.im
Results
AccuracySegmentsBranch
81.1%2y.im
78.4%1x.im
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes29.0ms (0%)

Memory
-4.4MiB live, 43.1MiB allocated; 1ms collecting garbage
Counts
19 → 3
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 y.re (atan2.f64 x.im x.re))))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
Calls

5 calls:

6.0ms
x.re
5.0ms
y.im
5.0ms
y.re
5.0ms
x.im
4.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
69.4%4x.re
71.1%3x.im
72.6%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
74.4%4y.re
74.8%3y.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes21.0ms (0%)

Memory
32.8MiB live, 32.8MiB allocated; 0ms collecting garbage
Counts
17 → 3
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #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 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

4 calls:

5.0ms
y.re
5.0ms
y.im
5.0ms
x.im
4.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
71.1%3x.im
69.9%3y.re
67.5%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
68.6%3y.im
Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes8.0ms (0%)

Memory
-39.0MiB live, 10.4MiB allocated; 1ms collecting garbage
Counts
15 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))))
Outputs
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

1 calls:

4.0ms
x.im
Results
AccuracySegmentsBranch
69.5%2x.im
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes21.0ms (0%)

Memory
33.6MiB live, 33.6MiB allocated; 0ms collecting garbage
Counts
13 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
(*.f64 #s(approx (exp (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (neg (atan2 x.im x.re)) y.im))) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (*.f64 y.re (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))))) (*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (sin.f64 #s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re #s(approx (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)) (*.f64 y.im (+.f64 (/.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) y.re) (/.f64 (atan2.f64 x.im x.re) y.im))))))))
(*.f64 (exp.f64 (-.f64 #s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (*.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 y.re (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (cos.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))))))
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) #s(approx (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) y.im) (fma.f64 #s(literal -1/6 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 3 binary64))) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))))) (pow.f64 y.im #s(literal 2 binary64))))))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

5 calls:

4.0ms
y.re
4.0ms
x.re
4.0ms
y.im
4.0ms
x.im
3.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
55.8%1x.re
60.0%2y.im
57.8%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
60.9%3y.re
61.9%2x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes4.0ms (0%)

Memory
6.3MiB live, 6.3MiB allocated; 0ms collecting garbage
Counts
6 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) #s(literal 1 binary64))))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

1 calls:

2.0ms
x.im
Results
AccuracySegmentsBranch
60.2%2x.im
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes11.0ms (0%)

Memory
-28.2MiB live, 19.4MiB allocated; 1ms collecting garbage
Counts
4 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
Calls

5 calls:

2.0ms
y.im
2.0ms
x.re
2.0ms
y.re
2.0ms
x.im
2.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
34.1%1x.re
36.1%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
34.1%1y.re
34.1%1y.im
40.2%2x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes9.0ms (0%)

Memory
17.2MiB live, 17.2MiB allocated; 0ms collecting garbage
Counts
3 → 2
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #s(literal 3 binary64)))))))))))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Calls

5 calls:

2.0ms
x.im
1.0ms
y.im
1.0ms
x.re
1.0ms
y.re
1.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
21.0%1y.re
24.9%2y.im
21.0%1x.re
24.6%2(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
27.1%2x.im
Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes5.0ms (0%)

Memory
9.1MiB live, 9.1MiB allocated; 0ms collecting garbage
Counts
2 → 1
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Calls

3 calls:

1.0ms
x.im
1.0ms
y.im
1.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
21.0%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
21.0%1y.im
21.0%1x.im
Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes6.0ms (0%)

Memory
-34.9MiB live, 12.6MiB allocated; 1ms collecting garbage
Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Calls

5 calls:

2.0ms
y.re
1.0ms
y.im
1.0ms
x.im
1.0ms
x.re
1.0ms
(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Results
AccuracySegmentsBranch
13.5%1x.im
13.5%1y.re
13.5%1y.im
13.5%1x.re
13.5%1(*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch34.0ms (0%)

Memory
42.6MiB live, 42.6MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
30.0ms
-1.0787711338618997e+39
-1.894131933762278e+32
Samples
13.0ms111×0valid
11.0ms33×1valid
Compiler

Compiled 1 039 to 608 computations (41.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 5.0ms (26.2% of total)
ival-hypot: 3.0ms (15.7% of total)
ival-log: 3.0ms (15.7% of total)
adjust: 2.0ms (10.5% of total)
ival-atan2: 2.0ms (10.5% of total)
ival-sin: 2.0ms (10.5% of total)
ival-add: 1.0ms (5.2% of total)
ival-exp: 1.0ms (5.2% of total)
ival-sub: 1.0ms (5.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch37.0ms (0%)

Memory
-3.4MiB live, 44.1MiB allocated; 1ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×predicate-same
Steps
TimeLeftRight
33.0ms
4.3507432105227584e+113
5.033733775016935e+117
Samples
20.0ms57×1valid
8.0ms71×0valid
Compiler

Compiled 1 208 to 655 computations (45.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 5.0ms (21.9% of total)
ival-hypot: 5.0ms (21.9% of total)
adjust: 3.0ms (13.1% of total)
ival-log: 3.0ms (13.1% of total)
ival-sin: 2.0ms (8.7% of total)
ival-add: 1.0ms (4.4% of total)
ival-exp: 1.0ms (4.4% of total)
ival-sub: 1.0ms (4.4% of total)
ival-atan2: 1.0ms (4.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch60.0ms (0%)

Memory
-22.6MiB live, 73.3MiB allocated; 2ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
1.8458773950137837e-25
9.073550861741835e-24
30.0ms
-7.094563806832952
-0.000138975434667971
Samples
24.0ms189×0valid
18.0ms51×1valid
Compiler

Compiled 4 780 to 1 583 computations (66.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult: 8.0ms (24.2% of total)
ival-hypot: 5.0ms (15.1% of total)
ival-sin: 5.0ms (15.1% of total)
adjust: 4.0ms (12.1% of total)
ival-log: 4.0ms (12.1% of total)
ival-atan2: 3.0ms (9.1% of total)
ival-exp: 2.0ms (6% of total)
ival-add: 1.0ms (3% of total)
ival-sub: 1.0ms (3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch10.0ms (0%)

Memory
12.5MiB live, 12.5MiB allocated; 0ms collecting garbage
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×predicate-same
Steps
TimeLeftRight
8.0ms
8.348578167512619e-39
9.566604644112785e-39
1.0ms
-1.0787711338618997e+39
-1.894131933762278e+32
Samples
4.0ms12×1valid
2.0ms20×0valid
Compiler

Compiled 672 to 407 computations (39.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 5.0ms
adjust: 1.0ms (19.7% of total)
ival-mult: 1.0ms (19.7% of total)
ival-hypot: 1.0ms (19.7% of total)
ival-log: 1.0ms (19.7% of total)
ival-sin: 1.0ms (19.7% of total)
ival-add: 0.0ms (0% of total)
ival-exp: 0.0ms (0% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-atan2: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch1.0ms (0%)

Memory
1.6MiB live, 1.6MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
0.0ms
8.348578167512619e-39
9.566604644112785e-39
Compiler

Compiled 276 to 155 computations (43.8% saved)

bsearch24.0ms (0%)

Memory
-18.7MiB live, 28.6MiB allocated; 2ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
22.0ms
227253732.91248268
571550698.8937728
Samples
10.0ms31×1valid
6.0ms49×0valid
Compiler

Compiled 1 570 to 508 computations (67.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-mult: 3.0ms (22.9% of total)
adjust: 2.0ms (15.2% of total)
ival-hypot: 2.0ms (15.2% of total)
ival-log: 2.0ms (15.2% of total)
ival-sin: 2.0ms (15.2% of total)
ival-exp: 1.0ms (7.6% of total)
ival-atan2: 1.0ms (7.6% of total)
ival-assert: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-add: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
2.6MiB live, 2.6MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
1.0ms
227253732.91248268
571550698.8937728
Compiler

Compiled 1 105 to 428 computations (61.3% saved)

bsearch35.0ms (0%)

Memory
-4.9MiB live, 42.6MiB allocated; 1ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
32.0ms
-1.1298740895108001e-302
-1.1625179088281437e-306
Samples
14.0ms38×1valid
10.0ms90×0valid
Compiler

Compiled 5 648 to 1 319 computations (76.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 20.0ms
ival-mult: 5.0ms (25.6% of total)
ival-hypot: 3.0ms (15.4% of total)
ival-log: 3.0ms (15.4% of total)
adjust: 2.0ms (10.2% of total)
ival-atan2: 2.0ms (10.2% of total)
ival-sin: 2.0ms (10.2% of total)
ival-exp: 1.0ms (5.1% of total)
ival-sub: 1.0ms (5.1% of total)
ival-add: 1.0ms (5.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch5.0ms (0%)

Memory
8.1MiB live, 8.1MiB allocated; 0ms collecting garbage
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
5.0ms
-1.1298740895108001e-302
-1.1625179088281437e-306
Compiler

Compiled 7 280 to 1 711 computations (76.5% saved)

simplify81.0ms (0.1%)

Memory
20.1MiB live, 69.7MiB allocated; 2ms collecting garbage
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03563769
16813749
221973625
376963625
Stop Event
1×node limit
Calls
Call 1
Inputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(if (<=.f64 x.im #s(literal -55999999999999996472597589357949353984 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 y.im #s(literal 320000000000000004979013161429389767765824447014739658678326585737866809972721825044795324772815183256386009877708800 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(if (<=.f64 y.im #s(literal -8070450532247929/2305843009213693952 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.im #s(literal 1531270651144223/170141183460469231731687303715884105728 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -99999999999999997748809823456034029568 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #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)))) (if (<=.f64 x.im #s(literal 6742980379809911/766247770432944429179173513575154591809369561091801088 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(if (<=.f64 x.im #s(literal 6742980379809911/766247770432944429179173513575154591809369561091801088 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal 230000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal 230000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -7463583090707079/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -7463583090707079/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
Outputs
(*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(if (<=.f64 x.im #s(literal -55999999999999996472597589357949353984 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -55999999999999996472597589357949353984 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 y.im #s(literal 320000000000000004979013161429389767765824447014739658678326585737866809972721825044795324772815183256386009877708800 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))))
(if (<=.f64 y.im #s(literal -8070450532247929/2305843009213693952 binary64)) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) (if (<=.f64 y.im #s(literal 1531270651144223/170141183460469231731687303715884105728 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (or (<=.f64 y.im #s(literal -8070450532247929/2305843009213693952 binary64)) (not (<=.f64 y.im #s(literal 1531270651144223/170141183460469231731687303715884105728 binary64)))) (*.f64 (exp.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))))
(if (<=.f64 x.im #s(literal -99999999999999997748809823456034029568 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #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)))) (if (<=.f64 x.im #s(literal 6742980379809911/766247770432944429179173513575154591809369561091801088 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(if (<=.f64 x.im #s(literal -99999999999999997748809823456034029568 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (*.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (neg.f64 x.im))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))) (if (<=.f64 x.im #s(literal 6742980379809911/766247770432944429179173513575154591809369561091801088 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))))
(if (<=.f64 x.im #s(literal 6742980379809911/766247770432944429179173513575154591809369561091801088 binary64)) (*.f64 (exp.f64 (-.f64 (*.f64 (log.f64 (sqrt.f64 (+.f64 (*.f64 x.re x.re) (*.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 y.im (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal 230000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 y.im (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im 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 (hypot.f64 x.im x.re) y.re)))))))))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal 230000000 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -7463583090707079/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (exp.f64 (-.f64 (*.f64 y.re (log.f64 x.im)) (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
(if (<=.f64 x.im #s(literal -7463583090707079/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
(if (<=.f64 x.im #s(literal -7463583090707079/6325070415853456823515479584966165845298645305129441198653167438357198111499854590373761990669910140474596183259900372230931523043306046152094168748148078435047419508642698792639590866940413010663742739952273283392562733857021646831815729864036236135650314266011211548510419206725953204130822734645187695728365866909171712 binary64)) #s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (+ (* y.im (+ (* -1 (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (* y.im (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* -1/6 (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)))))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re))) (*.f64 (pow.f64 y.im #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.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)))) y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.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))) y.im) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.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))) y.im) (+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (*.f64 (log.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (+.f64 (pow.f64 x.im #s(literal 2 binary64)) (pow.f64 x.re #s(literal 2 binary64)))) y.re))) (pow.f64 y.im #s(literal 2 binary64))) (/.f64 (*.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)) (pow.f64 y.im #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 (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re #s(approx (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (sin (* y.im (log x.im)))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 3) (sin (* y.im (log x.im)))))) (* 1/2 (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log x.im) 2) (atan2 x.im x.re))))))))) (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (atan2 x.im x.re)))))))) (+ (* (cos (* y.im (log x.im))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log x.im) (sin (* y.im (log x.im))))))) (*.f64 (pow.f64 y.re #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (sin.f64 (*.f64 y.im (log.f64 x.im)))))) (neg.f64 y.re))) y.re) (fma.f64 #s(literal -1/2 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (log.f64 x.im) (*.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (*.f64 y.im (log.f64 x.im))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 y.im (log.f64 x.im))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))) (*.f64 (exp.f64 (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (*.f64 y.im (log.f64 x.im)))))))

derivations269.0ms (0.2%)

Memory
0.2MiB live, 239.8MiB allocated; 5ms collecting garbage
Stop Event
1×fuel
Compiler

Compiled 3 777 to 365 computations (90.3% saved)

preprocess103.0ms (0.1%)

Memory
1.0MiB live, 143.4MiB allocated; 7ms collecting garbage
Compiler

Compiled 7 628 to 768 computations (89.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated; 0ms collecting garbage

Profiling

Loading profile data...